powComplex, imaginary part

Time bar (total: 15.0s)

start0.0ms (0%)

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

analyze320.0ms (2.1%)

Memory
-10.3MiB live, 325.0MiB allocated; 26ms 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)

sample2.0s (13.4%)

Memory
9.4MiB live, 2 102.3MiB allocated; 116ms collecting garbage
Samples
953.0ms2 899×1valid
590.0ms5 288×0valid
48.0ms69×2valid
Precisions
Click to see histograms. Total time spent on operations: 1.3s
ival-mult!: 278.0ms (21.3% of total)
ival-hypot: 248.0ms (19% of total)
ival-sin: 206.0ms (15.8% of total)
ival-log: 204.0ms (15.7% of total)
adjust: 117.0ms (9% of total)
ival-atan2: 113.0ms (8.7% of total)
ival-exp: 83.0ms (6.4% of total)
ival-sub!: 28.0ms (2.2% of total)
ival-add!: 26.0ms (2% of total)
Bogosity

explain357.0ms (2.4%)

Memory
13.6MiB live, 406.8MiB allocated; 13ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1890-1(-1.9462724060944152e-202 4.4259234772532087e+58 2.8374351481302546e-226 -0.4689267997325419)(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
1380-2(-2.4426086459058754e-248 -1.731094546785439e-156 1.1200186316237965e+250 1.280197765512798e+292)(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
60-0-(*.f64 (atan2.f64 x.im x.re) y.re)
50-0-(*.f64 (atan2.f64 x.im x.re) y.im)
10-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-(*.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-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)))sensitivity1861
sqrt.f64(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))oflow-rescue1180
(*.f64 x.re x.re)overflow70
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))overflow118
(*.f64 x.im x.im)overflow73
sqrt.f64(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))uflow-rescue30
(*.f64 x.re x.re)underflow67
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))underflow18
(*.f64 x.im x.im)underflow54
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 x.re x.re)overflow70
(+.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)overflow2
(*.f64 x.im x.im)overflow73
exp.f64(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))sensitivity10
*.f64(*.f64 (atan2.f64 x.im x.re) y.im)n*u10
Confusion
Predicted +Predicted -
+1555
-7125
Precision
0.6858407079646017
Recall
0.96875
Confusion?
Predicted +Predicted MaybePredicted -
+15514
-71025
Precision?
0.6872246696035242
Recall?
0.975
Freqs
test
numberfreq
030
1141
285
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
139.0ms366×1valid
19.0ms138×0valid
6.0ms2valid
Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 130.0ms
ival-mult!: 30.0ms (23.2% of total)
ival-sin: 24.0ms (18.5% of total)
ival-hypot: 19.0ms (14.7% of total)
ival-log: 18.0ms (13.9% of total)
adjust: 16.0ms (12.3% of total)
ival-atan2: 12.0ms (9.3% of total)
ival-exp: 5.0ms (3.9% of total)
ival-add!: 4.0ms (3.1% of total)
ival-sub!: 2.0ms (1.5% of total)

preprocess34.0ms (0.2%)

Memory
-32.0MiB live, 14.8MiB allocated; 3ms collecting garbage
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
0141575
1390556
21085552
32819550
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
38.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Compiler

Compiled 74 to 38 computations (48.6% saved)

series172.0ms (1.2%)

Memory
10.8MiB live, 199.1MiB allocated; 11ms 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
49.0ms
y.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
17.0ms
x.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
12.0ms
y.im
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
11.0ms
x.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
11.0ms
y.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))

rewrite210.0ms (1.4%)

Memory
25.1MiB live, 211.3MiB allocated; 14ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0158020000
0161119794
0824016874
Stop Event
iter-limit
node-limit
iter-limit
Counts
291 → 337
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Outputs
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(/.f64 (-.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (*.f64 x.re x.re) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.re
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 #s(literal 1 binary64) (*.f64 x.re x.re) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (*.f64 x.re x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 #s(literal 1 binary64) (*.f64 x.im x.im) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (*.f64 x.im x.im))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) y.re (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)) y.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) y.re (*.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (fma.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) y.re (*.f64 (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re) y.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) y.im (*.f64 (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (*.f64 #s(literal 1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (fma.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) y.im (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) y.im))))

eval70.0ms (0.5%)

Memory
-21.4MiB live, 78.2MiB allocated; 16ms collecting garbage
Compiler

Compiled 33 322 to 2 842 computations (91.5% saved)

prune329.0ms (2.2%)

Memory
-2.2MiB live, 238.6MiB allocated; 7ms collecting garbage
Pruning

15 alts after pruning (15 fresh and 0 done)

PrunedKeptTotal
New44015455
Fresh000
Picked101
Done000
Total44115456
Accuracy
92.6%
Counts
456 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.1%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
33.7%
(*.f64 (exp.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
32.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
24.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
33.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
29.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
34.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) y.im (*.f64 (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im) y.im)))))
56.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
13.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
26.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))
44.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
12.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
25.3%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
26.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
28.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
Compiler

Compiled 1 914 to 972 computations (49.2% saved)

series671.0ms (4.5%)

Memory
25.5MiB live, 746.6MiB allocated; 84ms collecting garbage
Counts
74 → 825
Calls
Call 1
Inputs
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
(sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
(log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))
(pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
#s(literal 1/2 binary64)
(*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
(neg.f64 y.re)
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
(-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))
#s(literal -1/2 binary64)
(/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))
(*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im)
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) x.im)
#s(literal -1 binary64)
Outputs
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.im y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (- (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (* -1 (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.im y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.im y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.im y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)))) (* -1 (* (pow x.re 2) (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (/ (- (* (pow x.re 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* -1/2 (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.re y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (- (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (* -1 (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.re y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.re y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.re y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)))) (* -1 (* (pow x.im 2) (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (log (pow (/ -1 x.im) -1)) #s(hole binary64 (+ (log -1) (log x.im))))
#s(approx (pow (/ -1 x.im) -1) #s(hole binary64 (* -1 x.im)))
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (- (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)) (* -1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (pow (/ -1 x.im) -1)) #s(hole binary64 (+ (log -1) (* -1 (log (/ 1 x.im))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (pow (/ -1 x.im) -1)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (neg y.re) #s(hole binary64 (* -1 y.re)))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (sin (* y.im (log x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (* (cos (* y.im (log x.re))) (atan2 x.im x.re)) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (+ (* y.re (- (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (* -1/12 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* y.re (+ (* 1/4 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* y.re (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* y.re (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (* y.im (log x.re)))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* -1/2 (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (* 1/6 (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (* y.im (log x.re))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* y.im (cos (* y.im (log x.re)))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (cos (* y.im (log x.re)))) (* y.re (+ (* -1 (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (cos (* y.im (log x.re)))) (* y.re (+ (* -1 (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (- (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re) (* -1 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re)) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 1))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* 1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* 1/4 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2)))))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (+ (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (+ (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2)))))))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (pow x.re 2))))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (+ (* -1/2 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* 1/6 (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* y.im (- (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im) (* -1/2 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im)) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Calls

12 calls:

TimeVariablePointExpression
114.0ms
y.re
@0
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1)
62.0ms
x.re
@0
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1)
56.0ms
y.re
@inf
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1)
56.0ms
x.im
@inf
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1)
48.0ms
x.re
@-inf
((* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (exp (* (atan2 x.im x.re) y.im)) (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) 1/2 (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (log x.re) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log (pow (/ -1 x.im) -1)) (pow (/ -1 x.im) -1) (/ -1 x.im) -1)

rewrite345.0ms (2.3%)

Memory
4.2MiB live, 383.4MiB allocated; 19ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0446561934
0460059822
0909354941
Stop Event
iter-limit
node-limit
iter-limit
Counts
899 → 1 037
Calls
Call 1
Inputs
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
(sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
(log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))
(pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
#s(literal 1/2 binary64)
(*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
(neg.f64 y.re)
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
(-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))
#s(literal -1/2 binary64)
(/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))
(*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im)
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) x.im)
#s(literal -1 binary64)
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.im y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (- (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (* -1 (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.im y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.im y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.im y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)))) (* -1 (* (pow x.re 2) (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (/ (- (* (pow x.re 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* -1/2 (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (log x.re)))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.re))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.re))))) (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.re y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (- (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (* -1 (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.re y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.re y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.re y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)))) (* -1 (* (pow x.im 2) (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (log (pow (/ -1 x.im) -1)) #s(hole binary64 (+ (log -1) (log x.im))))
#s(approx (pow (/ -1 x.im) -1) #s(hole binary64 (* -1 x.im)))
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* (pow x.im 2) (- (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)) (* -1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (pow (/ -1 x.im) -1)) #s(hole binary64 (+ (log -1) (* -1 (log (/ 1 x.im))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (pow (/ -1 x.im) -1)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (neg y.re) #s(hole binary64 (* -1 y.re)))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (sin (* y.im (log x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (* (cos (* y.im (log x.re))) (atan2 x.im x.re)) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (+ (* y.re (- (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (+ (sin (* y.im (log x.re))) (* y.re (- (+ (* y.re (- (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* y.re (- (* -1/6 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))) (* -1/12 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* y.re (+ (* 1/4 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))) (* y.re (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* y.re (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))))))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))) (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2)))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (* y.im (log x.re)))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* -1/2 (* (pow x.im 2) (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))) (* 1/6 (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))))))) (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (* y.im (log x.re))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (* y.im (cos (* y.im (log x.re)))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (cos (* y.im (log x.re)))) (* y.re (+ (* -1 (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (cos (* y.im (log x.re)))) (* y.re (+ (* -1 (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* y.im (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1 (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.re))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.re))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (/ (* (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (- (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re) (* -1 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re)) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.re)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 1))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* 1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* 1/4 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2)))))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))) (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* -1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (+ (* 1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* y.im (+ (* 1/2 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (+ (* -1/12 (/ (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2)))))))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (/ (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re))))) (pow x.re 2))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (pow x.re 2))))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (pow x.re 2))) (* 1/6 (/ (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))) (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.im 2) (* y.im (cos (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* -1 (* (pow x.im 2) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))) (* y.im (+ (* -1/2 (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* 1/6 (* (pow x.im 2) (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (cos (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re))))))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2)))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 2))) (* 1/6 (* y.im (* (pow (log x.re) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* y.im (- (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im) (* -1/2 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) y.im)) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.re)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Outputs
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re)
(pow.f64 (hypot.f64 x.re x.im) y.re)
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (cosh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)) (sinh.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (neg.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
(pow.f64 (exp.f64 y.re) (log.f64 x.im))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(+.f64 (cosh.f64 (*.f64 y.re (log.f64 x.im))) (sinh.f64 (*.f64 y.re (log.f64 x.im))))
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
(log.f64 x.im)
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(*.f64 y.im (atan2.f64 x.im x.re))
(fma.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(/.f64 (-.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (*.f64 (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (fma.f64 (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
(-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
(+.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
(sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
(*.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))
(log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))
(*.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) (/.f64 y.im #s(literal 2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) (/.f64 y.im #s(literal 2 binary64))))
(pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.im #s(literal 2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) y.im))
(exp.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) y.im))
(*.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (neg.f64 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (fabs.f64 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) x.re)
(hypot.f64 (neg.f64 x.im) (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(exp.f64 (*.f64 (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 x.re x.re))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(-.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 x.re) x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
#s(literal 1/2 binary64)
(*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
(neg.f64 y.re)
(*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))
(fma.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
(cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
(+.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))))
(/.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))))))
(-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))
(+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))
(fma.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))
(-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.re)
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))
#s(literal -1/2 binary64)
(*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))
(/.f64 (neg.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))) (neg.f64 (*.f64 x.re x.re)))
(/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))
(*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (sin.f64 (fma.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(fma.f64 (sin.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (fma.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(fma.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re))
(+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im)
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
(*.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1/2 binary64)))
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) x.im))
(exp.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 x.im))
(/.f64 #s(literal -1 binary64) x.im)
#s(literal -1 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (*.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.im y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 x.im y.re))) (*.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 x.im (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 x.im)))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 x.im y.im))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 x.im y.im))) (*.f64 x.im x.im)) (pow.f64 x.im y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im)))) (pow.f64 x.im y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.im)))))) (pow.f64 x.im y.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (-.f64 x.im (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.im) (*.f64 (neg.f64 (*.f64 x.re x.re)) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (/.f64 (-.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (log.f64 x.re))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.re))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (*.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.re (*.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.re y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (pow.f64 x.re y.re))) (*.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 x.re (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 x.im y.re))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 x.re)))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 x.re y.im))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 x.re y.im))) (*.f64 x.re x.re)) (pow.f64 x.re y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im)))) (pow.f64 x.re y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.im)))))) (pow.f64 x.re y.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (-.f64 x.re (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.re) (*.f64 (neg.f64 (*.f64 x.im x.im)) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (pow (/ -1 x.im) -1)) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))
#s(approx (pow (/ -1 x.im) -1) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (/ -1 x.im) (/.f64 #s(literal -1 binary64) x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (log (pow (/ -1 x.im) -1)) (-.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (log (pow (/ -1 x.im) -1)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (/.f64 (fma.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* y.re (log x.im))) #s(literal 1 binary64))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))))
#s(approx (exp (* y.re (log x.im))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (-.f64 (log.f64 x.im) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (exp (* y.re (log x.im))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (neg.f64 y.re) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re)))))
#s(approx (neg y.re) (*.f64 #s(literal -1 binary64) y.re))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (-.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (-.f64 (fma.f64 y.re (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 x.re x.re)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.re)))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)))))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 x.re x.re)))))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.re) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.re) (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (-.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (-.f64 (/.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) x.re) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) x.re)))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(literal 1 binary64))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(literal 1 binary64))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re)))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))))))
#s(approx (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.re))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re))))))))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (*.f64 x.re x.re)))) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)))))
#s(approx (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))) (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))))))
#s(approx (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (*.f64 y.im (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 y.im) (-.f64 (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 y.im (-.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im)))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im))))))
#s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))

eval201.0ms (1.3%)

Memory
-17.9MiB live, 259.2MiB allocated; 32ms collecting garbage
Compiler

Compiled 146 618 to 8 894 computations (93.9% saved)

prune1.6s (10.5%)

Memory
30.3MiB live, 1 475.2MiB allocated; 33ms collecting garbage
Pruning

22 alts after pruning (20 fresh and 2 done)

PrunedKeptTotal
New1 506151 521
Fresh5510
Picked325
Done000
Total1 514221 536
Accuracy
95.9%
Counts
1 536 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
48.7%
(*.f64 (/.f64 (+.f64 (cosh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
32.2%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
53.3%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
27.1%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
69.5%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) #s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
33.7%
(*.f64 (exp.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
82.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
32.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
33.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
29.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 #s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
26.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))
44.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
12.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
21.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
24.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
22.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 #s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (pow.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
14.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (* x.im x.im) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* x.re x.re)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
55.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
25.4%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
25.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 #s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))))))
27.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
23.2%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
Compiler

Compiled 3 341 to 1 573 computations (52.9% saved)

series792.0ms (5.3%)

Memory
-6.4MiB live, 898.8MiB allocated; 75ms collecting garbage
Counts
88 → 1 073
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 #s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
(fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(literal 1/6 binary64)
(/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))
(pow.f64 (log.f64 x.im) #s(literal 3 binary64))
(log.f64 x.im)
#s(literal 3 binary64)
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))
(exp.f64 y.im)
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(literal 1/2 binary64)
(/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(pow.f64 (log.f64 x.im) #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))
#s(literal -1 binary64)
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
(*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.f64)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
(sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))))
(log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))
#s(literal 1 binary64)
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
(neg.f64 y.im)
(fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
(log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
(neg.f64 y.re)
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (log x.im) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.im y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (- (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (* -1 (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.im y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.im y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.im y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))) (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4))))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6))))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (- (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))) (* 1/4 (/ 1 (pow x.im 4))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (log (pow x.im 2))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* -1/2 (/ (pow x.re 2) (pow x.im 4))) (/ 1 (pow x.im 2)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/3 (/ (pow x.re 2) (pow x.im 6))) (* 1/2 (/ 1 (pow x.im 4))))) (/ 1 (pow x.im 2)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log x.im) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (log x.im))) (pow x.im 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/2 (* (pow x.re 2) (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (/ (* (pow x.re 2) (* y.im (log x.im))) (pow x.im 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* y.im (log x.im)) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* y.im (log x.im)) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)))) (* -1 (* (pow x.re 2) (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.im) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/6 (/ (pow x.im 6) (pow x.re 6))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ 1 x.re)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (/ (pow x.im 2) (pow x.re 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (/ 1 x.re)) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (* y.im (pow (log (/ 1 x.re)) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ 1 x.re)) 2)) (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ 1 x.re)) 2)) (+ (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/6 (/ (pow x.im 6) (pow x.re 6))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ -1 x.re)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (/ (pow x.im 2) (pow x.re 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (/ -1 x.re)) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (* y.im (pow (log (/ -1 x.re)) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ -1 x.re)) 2)) (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ -1 x.re)) 2)) (+ (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* y.re (pow (log x.im) 3))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.re y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (- (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (* -1 (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.re y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.re y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.re y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))) (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4))))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6))))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ 1 (pow x.re 2))) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ 1 (pow x.re 2))) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (- (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))) (* 1/4 (/ 1 (pow x.re 4))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (log (pow x.re 2))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (/ (pow x.im 2) (pow x.re 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* -1/2 (/ (pow x.im 2) (pow x.re 4))) (/ 1 (pow x.re 2)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/3 (/ (pow x.im 2) (pow x.re 6))) (* 1/2 (/ 1 (pow x.re 4))))) (/ 1 (pow x.re 2)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log x.re) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (log x.re))) (pow x.re 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/2 (* (pow x.im 2) (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log x.re) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (/ (* (pow x.im 2) (* y.im (log x.re))) (pow x.re 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* y.im (log x.re)) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* y.im (log x.re)) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)))) (* -1 (* (pow x.im 2) (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.re) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* -1 (* y.re (pow (log (/ 1 x.im)) 3)))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/6 (/ (pow x.re 6) (pow x.im 6))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ 1 x.im)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (/ 1 x.im)) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (* y.im (pow (log (/ 1 x.im)) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ 1 x.im)) 2)) (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ 1 x.im)) 2)) (+ (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (log (/ -1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log -1) (exp (* y.im (atan2 x.im x.re))))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log -1) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (+ (log -1) (* -1 (log (/ -1 x.im)))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/6 (/ (pow x.re 6) (pow x.im 6))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ -1 x.im)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (/ -1 x.im)) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (* y.im (pow (log (/ -1 x.im)) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ -1 x.im)) 2)) (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ -1 x.im)) 2)) (+ (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (/ (log x.im) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (neg y.re) #s(hole binary64 (* -1 y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* 1/6 (/ (* (pow y.re 3) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (/ 1 (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/6 (/ (* (pow y.re 2) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (- (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re) (* -1 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (- (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (* y.re (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (log x.im) (exp (* y.im (atan2 x.im x.re))))) (/ 1 (* y.re (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (/ (log x.im) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re)) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))) (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re))))) (atan2 x.im x.re))) (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))) (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 3)) (* 1/6 (pow (atan2 x.im x.re) 3)))))) (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re))))) (atan2 x.im x.re))) (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (+ (* y.im (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* y.re (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))) (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))))))))))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.re (pow (log x.im) 3))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3)))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3)))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))) (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3)))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 1))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (exp y.im) #s(hole binary64 1))
#s(approx (exp y.im) #s(hole binary64 (+ 1 y.im)))
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* 1/2 y.im))))))
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* y.im (+ 1/2 (* 1/6 y.im))))))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (pow (log x.im) 2))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* 1/2 (pow (log x.im) 2)))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (log x.im)))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* -1 (* y.im (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* y.im (- (* -1 (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 1))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (+ 1 (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (+ 1 (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 3)) (* 1/6 (pow (atan2 x.im x.re) 3)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 1))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 1))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (+ 1 (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (+ 1 (* y.im (- (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* -1/2 (log (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* y.im (+ (* -1/2 (log (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* 1/2 (log (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* 1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (exp y.im) #s(hole binary64 (exp y.im)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (* (pow y.im 2) (- (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (* (pow y.im 2) (- (/ 1 (pow y.im 2)) (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (* (pow y.im 2) (- (+ (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (/ 1 (pow y.im 2))) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
Calls

12 calls:

TimeVariablePointExpression
192.0ms
y.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (log (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
62.0ms
x.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (log (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
56.0ms
y.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (log (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
53.0ms
x.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (log (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))
49.0ms
x.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (* y.re (pow (log x.im) 3)) (pow (log x.im) 3) (log x.im) 3 (pow (exp y.im) (atan2 x.im x.re)) (exp y.im) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow (log x.im) 2) 2 (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1) -1 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (sin (* 1/2 (PI))) (* 1/2 (PI)) (PI) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (log (+ (* x.im x.im) (* x.re x.re))) (+ (* x.im x.im) (* x.re x.re)) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (/ (PI) 2) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))

rewrite477.0ms (3.2%)

Memory
15.3MiB live, 581.1MiB allocated; 32ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05848113046
06010104793
0830097892
Stop Event
iter-limit
node-limit
iter-limit
Counts
1 161 → 1 259
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 #s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
(fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(literal 1/6 binary64)
(/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))
(pow.f64 (log.f64 x.im) #s(literal 3 binary64))
(log.f64 x.im)
#s(literal 3 binary64)
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))
(exp.f64 y.im)
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(literal 1/2 binary64)
(/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(pow.f64 (log.f64 x.im) #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))
#s(literal -1 binary64)
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
(*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.f64)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
(sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))))
(log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))
#s(literal 1 binary64)
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
(neg.f64 y.im)
(fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
(log.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))
(*.f64 y.im (*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))
(*.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
(neg.f64 y.re)
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (log x.im) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.im y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (- (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (* -1 (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))))
#s(approx (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.im y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.im y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.im y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))) (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4))))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6))))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (* 1/2 (* y.im (pow (log x.im) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* 1/2 (/ 1 (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/4 (/ 1 (pow x.im 4))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ 1 (pow x.im 2))) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (- (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* 1/6 (/ 1 (pow x.im 6)))))) (* 1/4 (/ 1 (pow x.im 4))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (log (pow x.im 2))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* -1/2 (/ (pow x.re 2) (pow x.im 4))) (/ 1 (pow x.im 2)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/3 (/ (pow x.re 2) (pow x.im 6))) (* 1/2 (/ 1 (pow x.im 4))))) (/ 1 (pow x.im 2)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log x.im) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (log x.im))) (pow x.im 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.im) 2))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (log x.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* 1/2 (* (pow x.re 2) (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (/ (* (pow x.re 2) (* y.im (log x.im))) (pow x.im 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* y.im (log x.im)) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.im) 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* y.im (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* y.im (log x.im)) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1 (* (pow x.re 2) (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)))) (* -1 (* (pow x.re 2) (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.im) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ 1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/6 (/ (pow x.im 6) (pow x.re 6))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ 1 x.re)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (/ (pow x.im 2) (pow x.re 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (/ 1 x.re)) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (* y.im (pow (log (/ 1 x.re)) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ 1 x.re)) 2)) (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ 1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ 1 x.re)) 2)) (+ (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.re))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.im (log (/ -1 x.re))))) (* 1/2 (pow x.im 2)))) (pow x.re 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.im 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.im 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))))) (pow x.re 6))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/6 (/ (pow x.im 6) (pow x.re 6))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ -1 x.re)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (/ (pow x.im 2) (pow x.re 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.re))) (+ (* -1/2 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/3 (/ (pow x.im 6) (pow x.re 6))) (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.re)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (/ -1 x.re)) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (* y.im (pow (log (/ -1 x.re)) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ -1 x.re)) 2)) (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (log (/ -1 x.re)))) (pow x.re 2))) (+ (* y.im (pow (log (/ -1 x.re)) 2)) (+ (/ (* y.im (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* y.re (pow (log x.im) 3))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (log (pow x.re y.im))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (- (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (- (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (* -1 (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (log (pow x.re y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (log (pow x.re y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow x.re y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))) (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))) (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4))))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6))))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (* 1/2 (* y.im (pow (log x.re) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* 1/2 (/ 1 (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ 1 (pow x.re 2))) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (- (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/4 (/ 1 (pow x.re 4))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (pow x.re 2))) (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ 1 (pow x.re 2))) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (- (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (+ (* 1/2 (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* 1/6 (/ 1 (pow x.re 6)))))) (* 1/4 (/ 1 (pow x.re 4))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (log (pow x.re 2))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (/ (pow x.im 2) (pow x.re 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* -1/2 (/ (pow x.im 2) (pow x.re 4))) (/ 1 (pow x.re 2)))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (log (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/3 (/ (pow x.im 2) (pow x.re 6))) (* 1/2 (/ 1 (pow x.re 4))))) (/ 1 (pow x.re 2)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log x.re) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (log x.re))) (pow x.re 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* 1/2 (* y.im (pow (log x.re) 2))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (log x.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/2 (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* 1/2 (* (pow x.im 2) (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log x.re) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (/ (* (pow x.im 2) (* y.im (log x.re))) (pow x.re 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* y.im (log x.re)) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* y.im (pow (log x.re) 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* y.im (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* y.im (log x.re)) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1 (* (pow x.im 2) (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))) (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1 (* y.re (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)))) (* -1 (* (pow x.im 2) (* y.re (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))) (pow x.re 2))) (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.re) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/6 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (* y.re (pow (log (/ 1 x.im)) 3)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* -1 (* y.re (pow (log (/ 1 x.im)) 3)))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (log (/ 1 x.im)) 2) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (/ (log (/ 1 x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ 1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ 1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/6 (/ (pow x.re 6) (pow x.im 6))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ 1 x.im)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ 1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ 1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (/ 1 x.im)) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (* y.im (pow (log (/ 1 x.im)) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ 1 x.im)) 2)) (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ 1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ 1 x.im)) 2)) (+ (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (log (/ -1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log -1) (exp (* y.im (atan2 x.im x.re))))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log -1) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* y.re (pow (log x.im) 3)) #s(hole binary64 (* y.re (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (/ (+ (log -1) (* -1 (log (/ -1 x.im)))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* -1 (* y.im (log (/ -1 x.im))))) (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6))))))) (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- 1 (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (- (+ 1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (log (/ -1 x.im))))) (* 1/2 (pow x.re 2)))) (pow x.im 2))) (+ (* -1 (/ (* y.im (+ (* -1/4 (pow x.re 4)) (* 1/2 (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/6 (pow x.re 6)) (* 1/2 (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))))) (pow x.im 6))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/6 (/ (pow x.re 6) (pow x.im 6))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -2 (log (/ -1 x.im)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (/ (pow x.re 2) (pow x.im 2)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ (* -2 (log (/ -1 x.im))) (+ (* -1/2 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/3 (/ (pow x.re 6) (pow x.im 6))) (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))) (+ (* 1/2 (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (* 1/2 (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (/ -1 x.im)) 2))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (* y.im (pow (log (/ -1 x.im)) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ -1 x.im)) 2)) (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (log (/ -1 x.im)))) (pow x.im 2))) (+ (* y.im (pow (log (/ -1 x.im)) 2)) (+ (/ (* y.im (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (+ (* -1 (/ (* y.re (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1 (/ (* y.re (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6))) (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (atan2 x.im x.re)) (+ (/ (* (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (/ (log x.im) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (neg y.re) #s(hole binary64 (* -1 y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* 1/6 (/ (* (pow y.re 3) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* (pow y.re 3) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (+ (/ 1 (* (pow y.re 3) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/6 (/ (* (pow y.re 2) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (/ (log x.im) (* (pow y.re 2) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (- (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re) (* -1 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (- (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (* y.re (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (log x.im) (exp (* y.im (atan2 x.im x.re))))) (/ 1 (* y.re (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (/ (log x.im) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re)))))) y.re)) (* 1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1/2 (/ (pow (log x.im) 2) (* y.re (exp (* y.im (atan2 x.im x.re)))))) (* -1/6 (/ (pow (log x.im) 3) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re)) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))) (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re))))) (atan2 x.im x.re))) (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) #s(hole binary64 (+ 1 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))) (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 3)) (* 1/6 (pow (atan2 x.im x.re) 3)))))) (* y.re (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (* y.re (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re))))) (atan2 x.im x.re))) (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (+ (* y.im (- (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (log x.im) (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* y.re (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))))))))) (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* y.re (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))) (* (log x.im) (atan2 x.im x.re)))) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/6 (* y.re (pow (log x.im) 3))) (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/6 (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/2 (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* -1/6 (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))))))))))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.re (pow (log x.im) 3))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3)))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3)))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))) (+ (* -1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))) (+ (* -1 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* y.re (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (* y.re (* (pow (log x.im) 3) (atan2 x.im x.re))))) (* y.re (pow (log x.im) 3)))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 1))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (exp y.im) #s(hole binary64 1))
#s(approx (exp y.im) #s(hole binary64 (+ 1 y.im)))
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* 1/2 y.im))))))
#s(approx (exp y.im) #s(hole binary64 (+ 1 (* y.im (+ 1 (* y.im (+ 1/2 (* 1/6 y.im))))))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (* 1/2 (pow (log x.im) 2))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* 1/2 (pow (log x.im) 2)))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (pow (log x.im) 2)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* -1/2 (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (log x.im)))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* -1 (* y.im (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* y.im (- (* -1 (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (log x.im) (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 1))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (+ 1 (* y.im (- (* -1 (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(hole binary64 (+ 1 (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))) (+ (* -1/2 (pow (atan2 x.im x.re) 3)) (* 1/6 (pow (atan2 x.im x.re) 3)))))) (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (atan2 x.im x.re) 2))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (* y.im (- (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (- (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (- (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))) (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 1))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 1))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (+ 1 (* 1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (+ 1 (* y.im (- (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* -1/2 (log (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1/2 (* y.im (log (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* y.im (+ (* -1/2 (log (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* 1/2 (log (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (+ (* 1/2 (log (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* 1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.im (+ (* -1 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (exp y.im) #s(hole binary64 (exp y.im)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) #s(hole binary64 (- (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (* (pow y.im 2) (- (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (* (pow y.im 2) (- (/ 1 (pow y.im 2)) (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(hole binary64 (* (pow y.im 2) (- (+ (* 1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (/ 1 (pow y.im 2))) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (/ (log (+ (pow x.im 2) (pow x.re 2))) y.im)) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 #s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 #s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))))
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))
(+.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))
(fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(+.f64 (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
(+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(literal 1/6 binary64)
(/.f64 (neg.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (log.f64 x.im))
(*.f64 (log.f64 x.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
(pow.f64 (log.f64 x.im) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (log.f64 x.im)) #s(literal 3 binary64)))
(log.f64 x.im)
#s(literal 3 binary64)
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))
(exp.f64 (*.f64 (log.f64 (exp.f64 y.im)) (atan2.f64 x.im x.re)))
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 y.im)
(+.f64 (cosh.f64 y.im) (sinh.f64 y.im))
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(literal 1/2 binary64)
(/.f64 (neg.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 (log.f64 x.im) (log.f64 x.im))
(pow.f64 (log.f64 x.im) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (log.f64 x.im)) #s(literal 2 binary64)))
#s(literal 2 binary64)
(/.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))
(pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(-.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(literal -1 binary64)
(fma.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
(*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.f64)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
(-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))
(sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))))
(log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))
#s(literal 1 binary64)
(*.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))
(neg.f64 y.im)
(fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))
(+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))
(log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))
(*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (neg.f64 (log.f64 (hypot.f64 x.im x.re))) (neg.f64 (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (fabs.f64 (log.f64 (hypot.f64 x.im x.re))) (fabs.f64 (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (log.f64 (hypot.f64 x.im x.re))) #s(literal 2 binary64)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) (log.f64 (hypot.f64 x.im x.re))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))))
(log.f64 (hypot.f64 x.im x.re))
(pow.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(exp.f64 (*.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
(neg.f64 y.re)
(*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))
(fma.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
(cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
(+.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)))) (neg.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (/.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)))
(*.f64 (fabs.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (fabs.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)))
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))
(pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 2 binary64))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))
(pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* 1/2 (PI))) (atan2 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 x.im)))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 x.im y.im))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 x.im y.im))) (*.f64 x.im x.im)) (pow.f64 x.im y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im)))) (pow.f64 x.im y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.im)))))) (pow.f64 x.im y.im)))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal 2 binary64) (log.f64 x.im)))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.im) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 x.im x.im))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 x.im)) (*.f64 x.im x.im)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (/.f64 (log.f64 x.im) (*.f64 x.im x.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (log.f64 x.im) (*.f64 x.im x.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (atan2.f64 x.im x.re))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (log.f64 x.im))) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (log.f64 x.im))) (*.f64 x.im x.im))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -2 binary64))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re))) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 x.re x.re)) (fma.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (*.f64 x.re x.re)) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.im x.im)))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -2 binary64))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re))) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 x.re x.re)) (fma.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 x.re x.re)) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* y.re (pow (log x.im) 3)) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (pow (log x.im) 3) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (pow (log x.im) 2) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (log.f64 x.re)))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 x.re y.im))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 x.re y.im))) (*.f64 x.re x.re)) (pow.f64 x.re y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im)))) (pow.f64 x.re y.im)))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.im)))))) (pow.f64 x.re y.im)))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal 2 binary64) (log.f64 x.re)))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.re) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal 2 binary64) (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 y.im (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 x.re x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 x.re)) (*.f64 x.re x.re)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (/.f64 (log.f64 x.re) (*.f64 x.re x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (log.f64 x.re) (*.f64 x.re x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (atan2.f64 x.im x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (log.f64 x.re))) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (log.f64 x.re))) (*.f64 x.re x.re))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (pow (log x.im) 3)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64)))))
#s(approx (pow (log x.im) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 3 binary64))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (pow (log x.im) 2) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 y.im (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 x.im x.im)) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 #s(literal -1 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 #s(literal -1 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* y.re (pow (log x.im) 3)) (*.f64 y.re (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))))
#s(approx (pow (log x.im) 3) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (pow (log x.im) 2) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (/.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im)))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -2 binary64))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (+ (* x.im x.im) (* x.re x.re))) (fma.f64 #s(literal -2 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im))) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 x.im x.im)) (fma.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 x.im x.im)) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (atan2.f64 x.im x.re) (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64)))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)))))
#s(approx (neg y.re) (*.f64 #s(literal -1 binary64) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.re (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 y.im) (*.f64 (atan2.f64 x.im x.re) #s(literal -1 binary64))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 y.re (log.f64 x.im)) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (log.f64 x.im) (*.f64 (*.f64 y.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (+.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) #s(literal -1 binary64)) (/.f64 (log.f64 x.im) (*.f64 (*.f64 y.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (log.f64 x.im) (*.f64 (*.f64 y.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (-.f64 (/.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (log.f64 x.im) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) y.re) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 y.re y.re) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) #s(literal -1 binary64))) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) y.re) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 x.im) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) y.re) (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.re (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 y.im (-.f64 (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) (atan2.f64 x.im x.re)) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))))) (pow (pow (exp y.im) (atan2 x.im x.re)) -1)) (+.f64 #s(literal 1 binary64) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) (atan2.f64 x.im x.re)) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+.f64 (log.f64 x.im) (fma.f64 y.im (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+.f64 (log.f64 x.im) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))))) (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re)))) (+.f64 (log.f64 x.im) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re)))) (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))))))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (/ (* y.re (pow (log x.im) 3)) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) #s(literal 1 binary64))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (pow (exp y.im) (atan2 x.im x.re)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (exp y.im) #s(literal 1 binary64))
#s(approx (exp y.im) (+.f64 #s(literal 1 binary64) y.im))
#s(approx (exp y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) y.im)))))
#s(approx (exp y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) y.im)))))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(approx (* 1/2 (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (/ (pow (log x.im) 2) (pow (exp y.im) (atan2 x.im x.re))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (log.f64 x.im))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (+.f64 (log.f64 x.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (+.f64 (log.f64 x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(approx (/ (log x.im) (pow (exp y.im) (atan2 x.im x.re))) (+.f64 (log.f64 x.im) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) #s(literal 1 binary64))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) (+.f64 #s(literal 1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)))))
#s(approx (pow (pow (exp y.im) (atan2 x.im x.re)) -1) (+.f64 #s(literal 1 binary64) (*.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im (-.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (+.f64 (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)))))))))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))
#s(approx (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) #s(literal 1 binary64))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) #s(literal 1 binary64))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal -1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (log.f64 (hypot.f64 x.im x.re)))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))))))
#s(approx (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))))))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (exp y.im) (exp.f64 y.im))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (-.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (pow.f64 (hypot.f64 x.im x.re) y.im))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im)) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (*.f64 (*.f64 y.im y.im) (-.f64 (pow.f64 (*.f64 y.im y.im) #s(literal -1 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64))))
#s(approx (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)) (*.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- 1 (* (neg y.im) (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))))) (*.f64 (*.f64 y.im y.im) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (pow.f64 (*.f64 y.im y.im) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (log (+ (* x.im x.im) (* x.re x.re)))) (* 1/2 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))) y.im) (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))

eval328.0ms (2.2%)

Memory
8.9MiB live, 426.8MiB allocated; 42ms collecting garbage
Compiler

Compiled 270 204 to 14 769 computations (94.5% saved)

prune2.7s (17.9%)

Memory
-23.4MiB live, 892.2MiB allocated; 37ms collecting garbage
Pruning

15 alts after pruning (14 fresh and 1 done)

PrunedKeptTotal
New2 03292 041
Fresh10515
Picked415
Done202
Total2 048152 063
Accuracy
96.0%
Counts
2 063 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
32.2%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
69.5%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) #s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
33.7%
(*.f64 (exp.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
76.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
60.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
81.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
22.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
14.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
21.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
16.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 #s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
10.8%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
24.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
24.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
55.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
27.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
Compiler

Compiled 2 109 to 1 094 computations (48.1% saved)

series403.0ms (2.7%)

Memory
16.8MiB live, 299.4MiB allocated; 18ms collecting garbage
Counts
81 → 939
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(log.f64 (hypot.f64 x.im x.re))
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
(*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))
(*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))
(neg.f64 y.im)
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
(*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(*.f64 y.re y.re)
(-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))
(pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))
(pow.f64 (hypot.f64 x.im x.re) y.im)
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))
(*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (*.f64 x.re x.re) x.im)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
(*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
(+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (pow x.im 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (* (pow x.im 2) (pow y.re 2))))))) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (* (pow x.im 2) (pow y.re 2))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))) (* (pow x.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (* (pow x.im 2) (pow y.re 2))))))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (* (pow x.im 2) (pow y.re 2))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))) (* (pow x.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (* (pow x.im 2) (pow y.re 2))))))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (pow (log (pow x.im y.im)) 2)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (pow x.im 2)) (pow (log (pow x.im y.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/4 (/ (pow y.im 2) (pow x.im 4))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (pow (log (pow x.im y.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (+ (* 1/4 (/ (pow y.im 2) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/360 (* (log (pow x.im y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow x.im 2)))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (pow (log (pow x.im y.im)) 2))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.im y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.im y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im))))
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.im) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 x.im))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (/ (* x.re x.re) x.im) #s(hole binary64 (/ (pow x.re 2) x.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (pow y.re 2))) (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.re 6)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 4))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.im (pow x.re 2))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (pow y.re 2))) (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.re 6)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 4))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6)))))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (pow x.re 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.re 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (* (pow x.re 2) (pow y.re 2))))))) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (* (pow x.re 2) (pow y.re 2))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))) (* (pow x.im 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (* (pow x.re 2) (pow y.re 2))))))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (* (pow x.re 2) (pow y.re 2))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))) (* (pow x.im 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (* (pow x.re 2) (pow y.re 2))))))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (pow (log (pow x.re y.im)) 2)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (pow x.re 2)) (pow (log (pow x.re y.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/4 (/ (pow y.im 2) (pow x.re 4))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (pow (log (pow x.re y.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (+ (* 1/4 (/ (pow y.im 2) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/360 (* (log (pow x.re y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow x.re 2)))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (pow (log (pow x.re y.im)) 2))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.re y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.re y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.re) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (pow y.re 2))) (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.im 6)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 4))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (pow y.re 2))) (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.im 6)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 4))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* -1/6 (pow (atan2 x.im x.re) 3)))))) (atan2 x.im x.re)))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* -1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* 1/2 (* y.im (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re)))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* 1/2 (* y.im (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* y.re (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* 1/2 (* y.im (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (log x.im) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re)))) (* (log x.im) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* (log x.im) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* (log x.im) (sin (* 1/2 (PI)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2)))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2))))
#s(approx (* y.re y.re) #s(hole binary64 (pow y.re 2)))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (/ (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* -1 (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (- (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* y.im (+ (* y.im (* (pow y.re 2) (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow y.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (* (pow y.im 2) (+ (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (pow y.re 2)) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow y.re 2))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (pow y.re 2)) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow y.re 2))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (+ (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow y.re 2))) (* y.im (+ (* 1/12 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))) (pow y.re 2))) (* 1/6 (/ (* (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 2)))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/3 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (+ (* 1/3 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.im (+ (* 1/12 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (* (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (- (/ (sin (* y.re (atan2 x.im x.re))) y.im) (* -1 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Calls

12 calls:

TimeVariablePointExpression
41.0ms
y.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))
33.0ms
y.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))
30.0ms
x.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))
28.0ms
x.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))
28.0ms
y.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (/ (PI) 2) (PI) 2 (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (exp (* y.re (log x.im))) (* y.re (log x.im)) (log x.im) (exp (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow (atan2 x.im x.re) 2) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (* 1/2 (/ (* x.re x.re) x.im)) 1/2 (/ (* x.re x.re) x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))

rewrite407.0ms (2.7%)

Memory
32.6MiB live, 259.1MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0483698106
0497890321
0845387519
Stop Event
iter-limit
node-limit
iter-limit
Counts
1 020 → 1 112
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(log.f64 (hypot.f64 x.im x.re))
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
(*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
(/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))
(*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))
(neg.f64 y.im)
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
(*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(*.f64 y.re y.re)
(-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(/.f64 (pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))
(pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))
(pow.f64 (hypot.f64 x.im x.re) y.im)
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))
(*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (*.f64 x.re x.re) x.im)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
(*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
(+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (+ (* (pow x.re 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 6) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 4) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.im)) (* (pow x.im 2) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.im 2) (pow (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.im) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.im) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (pow x.im 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (* (pow x.im 2) (pow y.re 2))))))) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (* (pow x.im 2) (pow y.re 2))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))) (* (pow x.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (* (pow x.im 2) (pow y.re 2))))))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (* (pow x.im 2) (pow y.re 2))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (/ (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.im 4) (pow y.re 2)))) (* (pow x.re 2) (+ (* 1/360 (/ (* (log (pow x.im y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (* (pow x.im 2) (pow y.re 2))))))))) (/ (* y.im (log (pow x.im y.im))) (* (pow x.im 2) (pow y.re 2))))) (/ (pow (log (pow x.im y.im)) 2) (pow y.re 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (pow (log (pow x.im y.im)) 2)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (log (pow x.im y.im)))) (pow x.im 2)) (pow (log (pow x.im y.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/4 (/ (pow y.im 2) (pow x.im 4))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (pow (log (pow x.im y.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* 1/12 (* (log (pow x.im y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (+ (* 1/4 (/ (pow y.im 2) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/360 (* (log (pow x.im y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))) (pow x.im 2)))))))) (/ (* y.im (log (pow x.im y.im))) (pow x.im 2)))) (pow (log (pow x.im y.im)) 2))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.im y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.im y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im))))
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.im) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.im) 2)) (/ (* (pow x.re 2) (* (pow y.im 2) (log x.im))) (pow x.im 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* (pow y.im 2) (log x.im)) (pow x.im 2)))) (* (pow y.im 2) (pow (log x.im) 2)))))
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 x.im))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (/ (* x.re x.re) x.im) #s(hole binary64 (/ (pow x.re 2) x.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.im) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (pow y.re 2))) (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.re 6)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (pow y.re 2)))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 4))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ 1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* 1/2 (/ (pow x.re 2) x.im))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* (pow x.re 2) (+ (* 1/2 (/ 1 x.im)) (/ x.im (pow x.re 2))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.re 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.re 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.re 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.re 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 4) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 6) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.re 2) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 6) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow y.re 2))))) (pow x.re 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (pow y.re 2))) (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.re 6)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (* (pow x.re 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (* (pow x.re 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (* (pow x.re 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (pow y.re 2)))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 4))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.re)) (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (pow x.im 2) (* y.im (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (pow y.im 2)) (pow x.re 4))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (pow y.im 2) (log (/ -1 x.re)))) (pow x.re 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.re)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6)))))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 2))) (+ (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 2) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2))))) 3)) (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (+ (* (pow x.im 2) (- (/ (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 4) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (+ (* 1/6 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 6) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))))) (/ (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 4) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))) (* 1/2 (/ (* y.im (- (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))))) (/ (* (pow y.im 2) (log x.re)) (* (pow x.re 2) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* y.im (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))) (* (pow x.re 2) (pow (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))) 2)))))) (/ (* (pow y.im 2) (pow (log x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log x.re) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (pow x.re 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.re 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (* (pow x.re 2) (pow y.re 2))))))) (* (pow y.re 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (* (pow y.re 2) (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (* (pow x.re 2) (pow y.re 2))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))) (* (pow x.im 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (* (pow x.re 2) (pow y.re 2))))))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (* (pow x.re 2) (pow y.re 2))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (/ (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow y.re 2))) (+ (* 1/4 (/ (pow y.im 2) (* (pow x.re 4) (pow y.re 2)))) (* (pow x.im 2) (+ (* 1/360 (/ (* (log (pow x.re y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))))))) (pow y.re 2))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (* (pow x.re 2) (pow y.re 2))))))))) (/ (* y.im (log (pow x.re y.im))) (* (pow x.re 2) (pow y.re 2))))) (/ (pow (log (pow x.re y.im)) 2) (pow y.re 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (pow (log (pow x.re y.im)) 2)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (* y.im (log (pow x.re y.im)))) (pow x.re 2)) (pow (log (pow x.re y.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/4 (/ (pow y.im 2) (pow x.re 4))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (pow (log (pow x.re y.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* 1/12 (* (log (pow x.re y.im)) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (+ (* 1/4 (/ (pow y.im 2) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/360 (* (log (pow x.re y.im)) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (/ (* y.im (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))) (pow x.re 2)))))))) (/ (* y.im (log (pow x.re y.im))) (pow x.re 2)))) (pow (log (pow x.re y.im)) 2))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.re y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.re y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log x.re) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow y.im 2) (pow (log x.re) 2)) (/ (* (pow x.im 2) (* (pow y.im 2) (log x.re))) (pow x.re 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* (pow y.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* (pow y.im 2) (log x.re)) (pow x.re 2)))) (* (pow y.im 2) (pow (log x.re) 2)))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (/ (+ (* 1/2 (pow x.re 2)) (pow x.im 2)) x.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (+ (* 1/2 (/ (pow x.im 2) (pow x.re 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log x.re) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (pow y.re 2))) (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.im 6)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (pow y.re 2)))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 4))) (+ (* -1/360 (/ (* y.im (* (log (/ 1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ 1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ 1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (* (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (sin (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))))) (pow x.im 6)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (pow x.im 2)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2))) (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 2)) (pow x.im 4))) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))))) (pow x.im 2)) (+ (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (+ (* -1/6 (pow (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) 3)) (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (/ (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 4) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/720 (/ (* y.im (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 6) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (* (pow x.im 4) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (* (pow x.im 2) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (- (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))) (pow (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))) 2)))))) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 6) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))) (+ (/ (* (pow y.re 2) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))) (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow y.re 2))))) (pow x.im 4)) (/ (* (pow y.re 2) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (pow y.re 2))) (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow y.re 2))))) (pow x.im 6)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (* (pow x.im 2) (pow y.re 2)))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 4) (pow y.re 2)))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (* (pow x.im 6) (pow y.re 2)))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (* (pow x.im 4) (pow y.re 2)))) (/ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (pow y.re 2)))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* -1/12 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 4))) (+ (* -1/360 (/ (* y.im (* (log (/ -1 x.im)) (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (pow x.re 2) (* y.im (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (pow y.im 2)) (pow x.im 4))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (pow y.im 2) (log (/ -1 x.im)))) (pow x.im 2))) (+ (* (pow y.im 2) (pow (log (/ -1 x.im)) 2)) (+ (/ (* (pow y.im 2) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (pow y.im 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) #s(hole binary64 (* -1 (* x.im (- (* -1/2 (/ (pow x.re 2) (pow x.im 2))) 1)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (+ (* 1/2 (/ (pow x.re 2) (pow x.im 2))) (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* -1/6 (pow (atan2 x.im x.re) 3)))))) (atan2 x.im x.re)))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* -1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* -1/2 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re)))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (* y.im (log x.im))) (* (log x.im) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log x.im) (sin (* y.im (log x.im)))) (exp (* y.im (atan2 x.im x.re))))))) (/ (sin (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (atan2 x.im x.re) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (+ (* -1/2 (* y.im (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (atan2 x.im x.re)) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (- (* y.re (- (+ (* y.re (- (* y.re (- (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/6 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* 1/2 (* y.im (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)) (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re)))))) (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* 1/2 (* y.im (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (* 1/2 (PI)))))) (* y.re (+ (* -1 (* y.im (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* y.re (+ (* 1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* 1/2 (* y.im (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (* (log x.im) (sin (* 1/2 (PI))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re)))) (* (log x.im) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* (log x.im) (sin (* 1/2 (PI)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log x.im) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (log x.im) (atan2 x.im x.re))))) (* (log x.im) (sin (* 1/2 (PI)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2)))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2))))
#s(approx (* y.re y.re) #s(hole binary64 (pow y.re 2)))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (/ (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.re (atan2 x.im x.re))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (/ (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (pow (atan2 x.im x.re) 2)) (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* -1 (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (pow (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)) 2) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (- (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (* y.re (atan2 x.im x.re)) y.im)))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (- (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* 1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.re 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (+ (* -1 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* y.im (+ (* y.im (* (pow y.re 2) (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow y.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (* (pow y.im 2) (+ (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (pow y.re 2)) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (- (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow y.re 2))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (/ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (pow y.re 2)) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow y.re 2))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (/ (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2) (pow y.re 2))) (+ (* 1/3 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow y.re 2))) (* y.im (+ (* 1/12 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))) (pow y.re 2))) (* 1/6 (/ (* (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 2)))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (pow y.re 2)))) (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow y.re 2))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/3 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) #s(hole binary64 (* (pow y.im 2) (+ (* y.im (+ (* y.im (+ (* 1/4 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (+ (* 1/3 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.im (+ (* 1/12 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (* (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (- (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) #s(hole binary64 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* y.im (- (/ (sin (* y.re (atan2 x.im x.re))) y.im) (* -1 (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (pow y.re 2) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (pow y.re 2) (- (/ (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow y.re 2)) (pow (atan2 x.im x.re) 2)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im)) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 y.re (atan2.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(log.f64 (hypot.f64 x.im x.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
(*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
(/.f64 (neg.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
(pow.f64 (exp.f64 y.re) (log.f64 x.im))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(+.f64 (cosh.f64 (*.f64 y.re (log.f64 x.im))) (sinh.f64 (*.f64 y.re (log.f64 x.im))))
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
(log.f64 x.im)
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
(-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))
(*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))
(neg.f64 y.im)
(*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))
(log.f64 (pow.f64 x.im (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (neg.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (neg.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
(*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(*.f64 (neg.f64 y.re) (neg.f64 y.re))
(*.f64 (fabs.f64 y.re) (fabs.f64 y.re))
(*.f64 y.re y.re)
(pow.f64 y.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 y.re) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re))) (fma.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
(-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (neg.f64 (*.f64 y.re y.re)))
(/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re))
(*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
(*.f64 (*.f64 y.im y.im) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))
(pow.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) #s(literal 2 binary64)))
(*.f64 y.im (log.f64 (hypot.f64 x.im x.re)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.im #s(literal 2 binary64)))
(pow.f64 (hypot.f64 x.im x.re) y.im)
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) y.im))
(*.f64 (atan2.f64 x.im x.re) (atan2.f64 x.im x.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (fma.f64 (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(-.f64 (/.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))) (/.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))) (fma.f64 (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64)))
(*.f64 (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (neg.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)))
(*.f64 (fabs.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (fabs.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)))
(*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im))
(pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 2 binary64))
(*.f64 (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (fabs.f64 (*.f64 (atan2.f64 x.im x.re) y.re)))
(*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))
(pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)) (fma.f64 (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (neg.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
(+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))
#s(literal 1/2 binary64)
(/.f64 (neg.f64 (*.f64 x.re x.re)) (neg.f64 x.im))
(/.f64 (*.f64 x.re x.re) x.im)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
(*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
(+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
(/.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 y.im))
(/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) x.im)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 x.im x.im)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (fma.f64 (*.f64 x.re x.re) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.im x.im)) (/.f64 (log.f64 x.im) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (log.f64 x.im))) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.im (log.f64 x.im)))) (*.f64 y.re y.re) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (fma.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.im (log.f64 x.im)))) (*.f64 y.re y.re) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)) (*.f64 y.re y.re))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.im x.im)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 (*.f64 x.im x.im) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/360 binary64) (*.f64 (*.f64 y.im (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.im))) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (log.f64 x.im)))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 x.im y.im))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 x.im y.im))) (*.f64 x.im x.im)) (pow.f64 x.im y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im)))) (pow.f64 x.im y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im) (*.f64 (*.f64 x.re x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.im)))))) (pow.f64 x.im y.im)))
#s(approx (pow (atan2 x.im x.re) 2) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (log.f64 x.im))) (*.f64 x.im x.im))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.im)) (*.f64 x.im x.im))) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) x.im)
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (* 1/2 (/ (* x.re x.re) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
#s(approx (/ (* x.re x.re) x.im) (/.f64 (*.f64 x.re x.re) x.im))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (/ (* y.re (atan2 x.im x.re)) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (neg.f64 (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im)))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)) (/.f64 x.im (*.f64 x.re x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (+.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.re x.re)) (/.f64 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))) (*.f64 x.re x.re))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (*.f64 x.re x.re)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 x.im y.re))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 x.re x.re)) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (fma.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (fma.f64 (*.f64 x.im x.im) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 (/.f64 (*.f64 y.im y.im) (*.f64 x.re x.re)) (/.f64 (log.f64 x.re) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.im (log.f64 x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (log.f64 x.re))) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re y.re) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re)))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (fma.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.im (log.f64 x.re)))) (*.f64 y.re y.re) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)) (*.f64 y.re y.re))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/360 binary64) (/.f64 (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 y.im (*.f64 x.re x.re)) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 y.re y.re)))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 (*.f64 x.re x.re) (*.f64 y.re y.re)))) (/.f64 (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)) (*.f64 y.re y.re))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/360 binary64) (*.f64 (*.f64 y.im (log.f64 x.re)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re))))))) (/.f64 (*.f64 y.im (*.f64 y.im (log.f64 x.re))) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (log.f64 x.re)))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 x.re x.re)) (+.f64 (*.f64 #s(literal 30 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 x.re y.im))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (pow.f64 x.re y.im))) (*.f64 x.re x.re)) (pow.f64 x.re y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im)))) (pow.f64 x.re y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im) (*.f64 (*.f64 x.im x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.im y.im) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.im)))))) (pow.f64 x.re y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 y.im (log.f64 x.re)) (*.f64 y.im (log.f64 x.re)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (log.f64 x.re))) (*.f64 x.re x.re))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (*.f64 y.im y.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 y.im y.im) (log.f64 x.re)) (*.f64 x.re x.re))) (pow.f64 (*.f64 y.im (log.f64 x.re)) #s(literal 2 binary64))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 x.re x.re) (*.f64 x.im x.im)) x.im))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.re) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 x.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re)))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 y.re y.re))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (+.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (*.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (/.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)) (/.f64 (fma.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (cos.f64 (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (/.f64 (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (/.f64 (*.f64 y.im y.im) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (-.f64 (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re)))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (fma.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re)))) (fma.f64 #s(literal -1/360 binary64) (*.f64 (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im))))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))))) (*.f64 y.re y.re))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im y.im) (*.f64 y.re y.re))) (/.f64 (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)) (*.f64 y.re y.re))))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (+.f64 (*.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)) (*.f64 #s(literal 720 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))) (*.f64 x.im x.im))) (/.f64 (fma.f64 (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))))) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) y.im)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) #s(literal 2 binary64))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (*.f64 y.im y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (*.f64 x.im x.im)) (fma.f64 (*.f64 y.im y.im) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (/.f64 (fma.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (+ x.im (* 1/2 (/ (* x.re x.re) x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))) #s(literal 1 binary64)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* y.re (log x.im))) #s(literal 1 binary64))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (*.f64 y.re (-.f64 (atan2.f64 x.im x.re) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (*.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (-.f64 (*.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (*.f64 y.re (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 y.re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (fma.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.re (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* y.re y.re) (*.f64 y.re y.re))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (*.f64 y.re y.re)))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 (hypot.f64 x.im x.re)))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (*.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 y.im (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 (-.f64 (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.re y.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (*.f64 (*.f64 y.im y.im) (/.f64 (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.re y.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2)) (-.f64 (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.re y.re)))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.re y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (*.f64 (*.f64 y.im y.im) (/.f64 (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.re y.re))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.re y.re)))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.re y.re)))))
#s(approx (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))) (+.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 y.re y.re))) (*.f64 y.im (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))) (*.f64 y.re y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))))))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 y.re y.re))) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.re y.re)))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 #s(literal 1/3 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 y.im (fma.f64 #s(literal 1/12 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (*.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (/.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) y.im))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (*.f64 y.im (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (*.f64 y.im (-.f64 (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 (hypot.f64 x.im x.re) y.im))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (- (sin (* y.re (atan2 x.im x.re))) (* (neg y.im) (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im)) (*.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (/ (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* y.im (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))

eval243.0ms (1.6%)

Memory
16.1MiB live, 199.3MiB allocated; 24ms collecting garbage
Compiler

Compiled 226 506 to 10 851 computations (95.2% saved)

prune2.4s (15.9%)

Memory
-45.7MiB live, 689.8MiB allocated; 71ms collecting garbage
Pruning

18 alts after pruning (15 fresh and 3 done)

PrunedKeptTotal
New1 83281 840
Fresh279
Picked325
Done011
Total1 837181 855
Accuracy
96.1%
Counts
1 855 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
32.2%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
69.5%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) #s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
33.7%
(*.f64 (exp.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
56.9%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 y.re (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re y.im))))))))
72.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.im))))))))))
74.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im #s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (/ (* y.re (atan2 x.im x.re)) y.im)) (log.f64 (hypot.f64 x.im x.re)))))))
60.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
64.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (* (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))))))))
28.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
14.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
21.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) #s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
16.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 (-.f64 #s(approx (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (pow.f64 (*.f64 y.im (*.f64 #s(literal -1 binary64) (log.f64 x.im))) #s(literal 2 binary64))) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
17.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) (*.f64 (*.f64 y.re y.re) (-.f64 (/.f64 (pow.f64 #s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))) #s(literal 2 binary64)) (*.f64 y.re y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
33.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (/.f64 #s(approx (- (* (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im)) (* (* (atan2 x.im x.re) y.re) (* (atan2 x.im x.re) y.re))) #s(approx (* (* y.re y.re) (- (/ (pow (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) 2) (* y.re y.re)) (pow (atan2 x.im x.re) 2))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
24.2%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (log.f64 #s(approx (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (*.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
55.7%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (- (sin (log (pow (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) y.im))) (* (neg y.re) (* (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
16.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))))))
27.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) #s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
Compiler

Compiled 5 370 to 1 265 computations (76.4% saved)

regimes63.0ms (0.4%)

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

5 calls:

12.0ms
y.im
12.0ms
x.im
12.0ms
x.re
12.0ms
y.re
11.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
82.6%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
84.7%2x.re
82.6%1x.im
82.6%1y.re
82.6%1y.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes53.0ms (0.4%)

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

5 calls:

10.0ms
y.im
10.0ms
y.re
10.0ms
x.re
10.0ms
x.im
8.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
84.8%3y.im
81.7%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
81.7%1x.im
85.5%3y.re
81.7%1x.re
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes14.0ms (0.1%)

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

1 calls:

10.0ms
y.re
Results
AccuracySegmentsBranch
83.7%2y.re
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes22.0ms (0.1%)

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

2 calls:

9.0ms
y.im
9.0ms
y.re
Results
AccuracySegmentsBranch
81.7%1y.im
81.7%1y.re
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes46.0ms (0.3%)

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

5 calls:

9.0ms
y.re
9.0ms
x.re
9.0ms
y.im
9.0ms
x.im
7.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
67.4%2x.im
70.5%3x.re
74.7%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
73.2%3y.im
81.3%3y.re
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes45.0ms (0.3%)

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

5 calls:

9.0ms
y.re
9.0ms
y.im
8.0ms
x.re
8.0ms
x.im
7.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
63.2%2x.im
64.3%3x.re
63.2%3y.im
63.6%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
61.5%2y.re
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes13.0ms (0.1%)

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

2 calls:

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

Compiled 38 to 23 computations (39.5% saved)

regimes12.0ms (0.1%)

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

2 calls:

6.0ms
x.im
5.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
63.1%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
63.6%3x.im
Compiler

Compiled 38 to 23 computations (39.5% saved)

regimes11.0ms (0.1%)

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

2 calls:

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

Compiled 38 to 23 computations (39.5% saved)

regimes14.0ms (0.1%)

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

3 calls:

4.0ms
x.re
4.0ms
x.im
4.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
61.7%2x.re
58.3%2x.im
55.7%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Compiler

Compiled 39 to 27 computations (30.8% saved)

regimes15.0ms (0.1%)

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

5 calls:

3.0ms
y.im
3.0ms
x.re
3.0ms
x.im
3.0ms
y.re
2.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
41.3%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
45.1%3x.im
33.2%2y.re
35.0%3y.im
44.2%2x.re
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes12.0ms (0.1%)

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

5 calls:

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

Compiled 41 to 35 computations (14.6% saved)

regimes11.0ms (0.1%)

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

5 calls:

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

Compiled 41 to 35 computations (14.6% saved)

regimes6.0ms (0%)

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

5 calls:

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

Compiled 41 to 35 computations (14.6% saved)

bsearch8.0ms (0.1%)

Memory
3.7MiB live, 3.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
Steps
TimeLeftRight
7.0ms
1.0716092038833835e-55
3.3404209770071802e-46
Samples
3.0ms1valid
3.0ms24×0valid
Compiler

Compiled 204 to 127 computations (37.7% saved)

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

bsearch55.0ms (0.4%)

Memory
25.1MiB live, 25.1MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
predicate-same
Steps
TimeLeftRight
33.0ms
2.8374351481302546e-226
1.9907966288653178e-214
17.0ms
-281369164.28350365
-6695451.7962575285
Samples
20.0ms66×1valid
19.0ms174×0valid
Compiler

Compiled 1 590 to 1 003 computations (36.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-mult!: 7.0ms (22.2% of total)
ival-hypot: 6.0ms (19.1% of total)
ival-log: 5.0ms (15.9% of total)
ival-sin: 5.0ms (15.9% of total)
ival-atan2: 3.0ms (9.5% of total)
adjust: 2.0ms (6.4% of total)
ival-exp: 2.0ms (6.4% of total)
ival-add!: 1.0ms (3.2% of total)
ival-sub!: 1.0ms (3.2% of total)

bsearch24.0ms (0.2%)

Memory
-43.0MiB live, 10.2MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
22.0ms
-6.655228839320073e-26
-1.4528159790654805e-26
Samples
9.0ms24×1valid
8.0ms72×0valid
Compiler

Compiled 718 to 443 computations (38.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-mult!: 3.0ms (21.4% of total)
ival-sub!: 3.0ms (21.4% of total)
ival-hypot: 2.0ms (14.3% of total)
ival-log: 2.0ms (14.3% of total)
ival-sin: 2.0ms (14.3% of total)
adjust: 1.0ms (7.1% of total)
ival-exp: 1.0ms (7.1% of total)
ival-atan2: 1.0ms (7.1% of total)
ival-add!: 0.0ms (0% of total)

bsearch41.0ms (0.3%)

Memory
17.8MiB live, 17.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
predicate-same
Steps
TimeLeftRight
30.0ms
2.722531120427203e+86
1.3137808066325967e+87
7.0ms
-2.5180157729595887e+32
-4.166573931151355e+20
Samples
16.0ms53×1valid
8.0ms12×2valid
7.0ms63×0valid
Compiler

Compiled 1 536 to 873 computations (43.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 26.0ms
ival-sin: 6.0ms (23.3% of total)
ival-hypot: 4.0ms (15.5% of total)
ival-mult!: 4.0ms (15.5% of total)
ival-log: 4.0ms (15.5% of total)
adjust: 3.0ms (11.6% of total)
ival-atan2: 2.0ms (7.8% of total)
ival-exp: 1.0ms (3.9% of total)
ival-add!: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 40 to 26 computations (35% saved)

bsearch26.0ms (0.2%)

Memory
10.7MiB live, 10.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
Steps
TimeLeftRight
23.0ms
-6.198997359869118e-307
1.293112421682029e-304
Samples
13.0ms45×1valid
6.0ms51×0valid
Compiler

Compiled 538 to 359 computations (33.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 16.0ms
ival-hypot: 3.0ms (19% of total)
ival-mult!: 3.0ms (19% of total)
ival-log: 3.0ms (19% of total)
ival-sin: 3.0ms (19% of total)
adjust: 2.0ms (12.7% of total)
ival-exp: 1.0ms (6.3% of total)
ival-atan2: 1.0ms (6.3% of total)
ival-add!: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 40 to 26 computations (35% saved)

bsearch1.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
+inf
NaN
Compiler

Compiled 40 to 26 computations (35% saved)

bsearch25.0ms (0.2%)

Memory
10.4MiB live, 10.4MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
22.0ms
5.390959193721723e-167
1.7915650887903498e-165
Samples
9.0ms84×0valid
9.0ms28×1valid
Compiler

Compiled 1 076 to 604 computations (43.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-hypot: 3.0ms (21.6% of total)
ival-mult!: 3.0ms (21.6% of total)
ival-log: 2.0ms (14.4% of total)
ival-sin: 2.0ms (14.4% of total)
adjust: 1.0ms (7.2% of total)
ival-exp: 1.0ms (7.2% of total)
ival-atan2: 1.0ms (7.2% of total)
ival-add!: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)

bsearch33.0ms (0.2%)

Memory
-34.6MiB live, 12.6MiB allocated; 2ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
30.0ms
6.248277996965726e-274
7.261475354756179e-271
Samples
14.0ms46×1valid
11.0ms82×0valid
Compiler

Compiled 1 016 to 535 computations (47.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 20.0ms
ival-hypot: 5.0ms (24.4% of total)
ival-mult!: 4.0ms (19.5% of total)
ival-log: 3.0ms (14.6% of total)
ival-sin: 3.0ms (14.6% of total)
adjust: 2.0ms (9.8% of total)
ival-atan2: 2.0ms (9.8% of total)
ival-exp: 1.0ms (4.9% of total)
ival-add!: 0.0ms (0% of total)
ival-sub!: 0.0ms (0% of total)

derivations260.0ms (1.7%)

Memory
-1.5MiB live, 46.2MiB allocated; 1ms collecting garbage
Stop Event
fuel
Compiler

Compiled 1 790 to 230 computations (87.2% saved)

preprocess148.0ms (1%)

Memory
24.0MiB live, 166.6MiB allocated; 10ms collecting garbage
Compiler

Compiled 3 654 to 498 computations (86.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...