math.sqrt on complex, imaginary part, im greater than 0 branch

Time bar (total: 8.2s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze93.0ms (1.1%)

Memory
2.4MiB live, 161.4MiB allocated
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%50%50%0%0%0%0
0%0%50%50%0%0%0%1
50%25%25%50%0%0%0%2
50%25%25%50%0%0%0%3
62.5%31.2%18.7%50%0%0%0%4
62.5%31.2%18.7%50%0%0%0%5
68.8%34.3%15.6%50%0%0%0%6
68.8%34.3%15.6%50%0%0%0%7
71.9%35.9%14%50%0%0%0%8
71.9%35.9%14%50%0%0%0%9
73.4%36.7%13.3%50%0%0%0%10
73.4%36.7%13.3%50%0%0%0%11
74.2%37.1%12.9%50%0%0%0%12
Compiler

Compiled 19 to 12 computations (36.8% saved)

sample1.5s (17.9%)

Memory
54.8MiB live, 2 226.6MiB allocated
Samples
579.0ms6 268×0valid
209.0ms792×2valid
157.0ms462×3valid
121.0ms734×1valid
Precisions
Click to see histograms. Total time spent on operations: 795.0ms
ival-hypot: 309.0ms (38.9% of total)
ival-mult: 248.0ms (31.2% of total)
ival-sqrt: 87.0ms (10.9% of total)
ival-sub: 73.0ms (9.2% of total)
adjust: 38.0ms (4.8% of total)
ival->: 24.0ms (3% of total)
exact: 13.0ms (1.6% of total)
ival-assert: 4.0ms (0.5% of total)
Bogosity

explain273.0ms (3.3%)

Memory
-3.8MiB live, 343.8MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1240-0-(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
290-0-(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
250-1(9.990706908300358e+264 3.0584829501259236e-24)(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
00-0-(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
00-0-(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
00-0-(*.f64 re re)
00-0-im
00-0-(+.f64 (*.f64 re re) (*.f64 im im))
00-0-#s(literal 2 binary64)
00-0-re
00-0-#s(literal 1/2 binary64)
00-0-(*.f64 im im)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sqrt.f64(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))oflow-rescue1140
(+.f64 (*.f64 re re) (*.f64 im im))overflow114
(*.f64 re re)overflow73
(*.f64 im im)overflow57
-.f64(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)cancellation290
sqrt.f64(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))uflow-rescue240
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))underflow38
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))underflow14
(*.f64 re re)underflow62
(*.f64 im im)underflow64
(+.f64 (*.f64 re re) (*.f64 im im))underflow10
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)underflow38
sqrt.f64(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))uflow-rescue100
(+.f64 (*.f64 re re) (*.f64 im im))underflow10
(*.f64 re re)underflow62
(*.f64 im im)underflow64
Confusion
Predicted +Predicted -
+1510
-0105
Precision
1.0
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+15100
-00105
Precision?
1.0
Recall?
1.0
Freqs
test
numberfreq
0105
1125
226
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
37.0ms378×0valid
15.0ms60×2valid
14.0ms36×3valid
9.0ms38×1valid
Compiler

Compiled 171 to 40 computations (76.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 53.0ms
ival-mult: 18.0ms (34.3% of total)
ival-hypot: 16.0ms (30.5% of total)
ival-sub: 5.0ms (9.5% of total)
ival-sqrt: 5.0ms (9.5% of total)
adjust: 4.0ms (7.6% of total)
ival-add: 3.0ms (5.7% of total)
exact: 1.0ms (1.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess52.0ms (0.6%)

Memory
-20.7MiB live, 61.9MiB allocated
Algorithm
egg-herbie
Rules
368×lower-fma.f64
368×lower-fma.f32
228×lower-*.f32
220×lower-*.f64
136×distribute-rgt-in
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03077
17175
215275
328575
442475
551575
663775
777575
883075
01215
02015
12515
23615
35215
47315
59815
615415
722715
831015
936015
1042015
1143415
1245015
1347015
1450015
1553115
1654315
1754515
054510
Stop Event
iter limit
saturated
iter limit
saturated
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
Symmetry

(abs im)

Compiler

Compiled 17 to 12 computations (29.4% saved)

eval0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Compiler

Compiled 2 to 2 computations (0% saved)

prune1.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
43.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
Compiler

Compiled 17 to 12 computations (29.4% saved)

simplify28.0ms (0.3%)

Memory
0.8MiB live, 38.1MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
cost-diff0
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
cost-diff128
(+.f64 (*.f64 re re) (*.f64 im im))
Rules
368×lower-fma.f64
368×lower-fma.f32
228×lower-*.f32
220×lower-*.f64
104×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01275
02075
12575
23675
35275
47375
59875
615475
722775
831075
936075
1042075
1143475
1245075
1347075
1450075
1553175
1654375
1754575
054549
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
#s(literal 2 binary64)
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(+.f64 (*.f64 re re) (*.f64 im im))
(*.f64 re re)
re
(*.f64 im im)
im
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
#s(literal 2 binary64)
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
(+.f64 (*.f64 re re) (*.f64 im im))
(fma.f64 re re (*.f64 im im))
(*.f64 re re)
re
(*.f64 im im)
im

localize50.0ms (0.6%)

Memory
-6.3MiB live, 70.5MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.00390625
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
accuracy5.53931841980846
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
accuracy6.815575154833727
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
accuracy28.895603671775156
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
Samples
19.0ms189×0valid
8.0ms30×2valid
6.0ms18×3valid
3.0ms19×1valid
Compiler

Compiled 77 to 14 computations (81.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-hypot: 8.0ms (32.5% of total)
ival-mult: 8.0ms (32.5% of total)
ival-sqrt: 3.0ms (12.2% of total)
adjust: 2.0ms (8.1% of total)
ival-sub: 2.0ms (8.1% of total)
ival-add: 1.0ms (4.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series26.0ms (0.3%)

Memory
3.0MiB live, 43.7MiB allocated
Counts
6 → 144
Calls
Call 1
Inputs
#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())
#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())
Outputs
#s(alt (pow im 2) (taylor 0 re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor inf re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor -inf re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor 0 im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt (+.f64 (*.f64 re re) (*.f64 im im)) (patch (+.f64 (*.f64 re re) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* 1/2 (/ (pow re 2) im))) (taylor 0 re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt re (taylor inf re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))) (taylor inf re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor inf re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor inf re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 re) (taylor -inf re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt re (taylor 0 im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* 1/2 (/ (pow im 2) re))) (taylor 0 im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor inf im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))) (taylor -inf im) (#s(alt (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (patch (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #<representation binary64>) () ())) ())
Calls

36 calls:

TimeVariablePointExpression
2.0ms
im
@0
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
2.0ms
re
@inf
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1.0ms
re
@-inf
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1.0ms
im
@inf
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1.0ms
im
@inf
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))

simplify328.0ms (4%)

Memory
47.2MiB live, 391.8MiB allocated
Algorithm
egg-herbie
Rules
11 848×lower-fma.f64
11 848×lower-fma.f32
8 470×lower-*.f64
8 470×lower-*.f32
3 078×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05513257
118143103
263803088
081972913
Stop Event
iter limit
node limit
Counts
144 → 138
Calls
Call 1
Inputs
(pow im 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
Outputs
(pow im 2)
(*.f64 im im)
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(pow re 2)
(*.f64 re re)
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 im (*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 im (*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 im (*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 im (*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 im (*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 im (*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/32 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 #s(literal 1/64 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 2 binary64))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 im im) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 im (*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 re) (*.f64 im im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/16 binary64)))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im)))) (neg.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/256 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (/.f64 (fma.f64 (*.f64 im im) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re)) #s(literal 1/4 binary64)) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))) (*.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 2 binary64))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 im (*.f64 im (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (*.f64 (*.f64 (*.f64 im im) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 re) (*.f64 im im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (sqrt.f64 im) (*.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal -1 binary64)))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (*.f64 im (*.f64 im im)))) (neg.f64 im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im)) #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (*.f64 im im)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (fma.f64 im im (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 (*.f64 re re) (*.f64 re re))))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (fma.f64 im im (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 (*.f64 re re) (*.f64 re re))))) (*.f64 (pow.f64 im #s(literal 8 binary64)) (/.f64 #s(literal 5/64 binary64) (pow.f64 re #s(literal 6 binary64))))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(neg.f64 (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -5/64 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 2 binary64))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(*.f64 (fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal 2 binary64)) (neg.f64 im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)) (neg.f64 im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(neg.f64 (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (fma.f64 re #s(literal -2 binary64) (/.f64 (fma.f64 re re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 im im))) (neg.f64 im))) im))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(fma.f64 re (/.f64 (*.f64 re #s(literal 1/2 binary64)) im) im)
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(fma.f64 (*.f64 re re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) im)
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(fma.f64 (*.f64 re re) (fma.f64 (*.f64 re re) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1/2 binary64) im)) im)
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) re) re)
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(fma.f64 re (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re)))) re)
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(fma.f64 re (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re))))) re)
(* -1 re)
(neg.f64 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(neg.f64 (fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) re) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(neg.f64 (fma.f64 re (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re)))) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(neg.f64 (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re))))) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) re) re)
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)) re)
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 im (*.f64 im (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)) re)
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(fma.f64 im (/.f64 (*.f64 re (*.f64 re #s(literal 1/2 binary64))) (*.f64 im im)) im)
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(fma.f64 im (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) im)
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(fma.f64 im (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) im)
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64)) (neg.f64 im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(*.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 1 binary64))) (neg.f64 im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(neg.f64 (fma.f64 im (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(fma.f64 re (fma.f64 re (/.f64 #s(literal 1/2 binary64) im) #s(literal -1 binary64)) im)
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) im)
(* 1/2 (/ (pow im 2) re))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (*.f64 (*.f64 im im) #s(literal 1/2 binary64))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (*.f64 (*.f64 im im) #s(literal 1/2 binary64)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) (/.f64 #s(literal 5/64 binary64) (pow.f64 re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (*.f64 (*.f64 im im) #s(literal 1/2 binary64))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (neg.f64 (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(neg.f64 (*.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64)))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 re))
(* 1/2 (/ (pow im 2) re))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 im (*.f64 im (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) #s(literal -5/128 binary64) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)))
im
(* im (+ 1 (* -1 (/ re im))))
(-.f64 im (*.f64 im (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 1 binary64))) (/.f64 re im)))
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (/ re im))))
(neg.f64 (fma.f64 im (/.f64 re im) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(fma.f64 im (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im)) re) im) (neg.f64 im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(neg.f64 (fma.f64 im (/.f64 (+.f64 (/.f64 (fma.f64 re (*.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 im im))) im) re) im) im))

rewrite279.0ms (3.4%)

Memory
8.2MiB live, 321.1MiB allocated
Rules
5 708×lower-fma.f64
5 708×lower-fma.f32
3 650×lower-*.f32
3 642×lower-*.f64
2 118×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01265
02065
15665
237465
3419265
0839138
Stop Event
iter limit
node limit
iter limit
Counts
6 → 292
Calls
Call 1
Inputs
(+.f64 (*.f64 re re) (*.f64 im im))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
Outputs
(+.f64 (*.f64 re re) (*.f64 im im))
(+.f64 (*.f64 im im) (*.f64 re re))
(+.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im))) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(exp.f64 (log.f64 (fma.f64 re re (*.f64 im im))))
(exp.f64 (*.f64 (log.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (neg.f64 (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fabs.f64 (fma.f64 re re (*.f64 im im)))
(-.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im))))
(-.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 im re))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 im re))))
(sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))))
(fma.f64 re re (*.f64 im im))
(fma.f64 re (/.f64 (*.f64 re (*.f64 re re)) (*.f64 (+.f64 re im) (-.f64 re im))) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(fma.f64 (*.f64 re re) (/.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im))) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(fma.f64 im im (*.f64 re re))
(fma.f64 (*.f64 re (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im))) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(fma.f64 (*.f64 re (*.f64 re re)) (/.f64 re (*.f64 (+.f64 re im) (-.f64 re im))) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 #s(literal 1 binary64) (*.f64 re re) (*.f64 im im))
(fma.f64 #s(literal -1 binary64) (*.f64 re (neg.f64 re)) (*.f64 im im))
(fma.f64 (exp.f64 (log.f64 re)) (exp.f64 (log.f64 re)) (*.f64 im im))
(fma.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)) (*.f64 re re))
(fma.f64 (/.f64 re (+.f64 re im)) (/.f64 (*.f64 re (*.f64 re re)) (-.f64 re im)) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(fma.f64 (/.f64 (*.f64 re re) (+.f64 re im)) (/.f64 (*.f64 re re) (-.f64 re im)) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(fma.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 re im)) (/.f64 re (-.f64 re im)) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(fma.f64 (*.f64 (neg.f64 re) #s(literal -1 binary64)) re (*.f64 im im))
(fma.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (fma.f64 re re (*.f64 im im)) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(fma.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (fma.f64 re re (*.f64 im im)))) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(neg.f64 (/.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (neg.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(neg.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))) (neg.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))
(/.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))) (*.f64 (+.f64 re im) (-.f64 re im)))
(/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))) (*.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 re im) (-.f64 im re)) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re)))))
(/.f64 (neg.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (neg.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (neg.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (fma.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))) (fma.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (*.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))))
(/.f64 (*.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (+.f64 re im) (-.f64 re im)) (fma.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re re)))))))
(/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (+.f64 re im) (-.f64 im re)))
(/.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (*.f64 (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re)))))
(/.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im))) (*.f64 (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (*.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) #s(literal 1 binary64)) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))
(/.f64 (*.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (*.f64 (fma.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))))) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (*.f64 (*.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (*.f64 (*.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))) (neg.f64 (neg.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re)))) (neg.f64 (*.f64 (+.f64 re im) (-.f64 im re))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im)))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im)))) (*.f64 (*.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im))))) (fma.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im))) (fma.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im))) (*.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (+.f64 re im) (-.f64 re im)))) (*.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im))))) (fma.f64 re (/.f64 (*.f64 re (*.f64 re re)) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))))
(/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (*.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (*.f64 (fma.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))) (fma.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))))))
(/.f64 (*.f64 (*.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))))
(/.f64 (*.f64 (*.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im)))) (fma.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re re))))))
(/.f64 (*.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im)))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))))
(/.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))) (+.f64 re im)) (-.f64 re im))
(pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64))
(pow.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 4 binary64))
(pow.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))) #s(literal 1/4 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (+.f64 re im) (-.f64 im re)) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re)))) #s(literal -1 binary64))
(*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (*.f64 (+.f64 re im) (-.f64 re im)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im)))))
(*.f64 (fma.f64 re re (*.f64 im im)) (/.f64 (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 (+.f64 re im) (-.f64 re im))))
(*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(*.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(*.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (fma.f64 re re (*.f64 im im)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(*.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))) (/.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im))))
(*.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im)))
(*.f64 (neg.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(*.f64 (neg.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))
(*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 im re))))
(*.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(*.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re im)) (+.f64 re im))
(*.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (fma.f64 re re (*.f64 im im)))
(*.f64 (/.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 (+.f64 re im) (-.f64 im re)) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (+.f64 re im) (-.f64 im re)))))) (fma.f64 re (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (+.f64 re im) (-.f64 im re))) (-.f64 (*.f64 (*.f64 im im) (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 re (*.f64 re (*.f64 re re)))))))
(*.f64 (/.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (+.f64 re im) (-.f64 im re)))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (+.f64 re im) (-.f64 im re)))))
(*.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (sqrt.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))))) (sqrt.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 (log.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/4 binary64))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(sqrt.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (sqrt.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))))) (sqrt.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal -2 binary64) re))
(+.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))) (*.f64 #s(literal -2 binary64) re))
(fma.f64 #s(literal 2 binary64) (neg.f64 re) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) re))
(fma.f64 (neg.f64 re) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 #s(literal -1 binary64) (*.f64 re #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re))
(fma.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal -2 binary64) re))
(fma.f64 #s(literal -2 binary64) re (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))))))
(/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (neg.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re)) (*.f64 #s(literal -2 binary64) re))) (fma.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re)) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal -2 binary64) re)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re))) (-.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal -2 binary64) re)))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (neg.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (neg.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) #s(literal 2 binary64)) (neg.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (*.f64 (neg.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) #s(literal 2 binary64)) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(pow.f64 (/.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #s(literal 2 binary64))
(*.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) #s(literal 2 binary64)))
(*.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 #s(literal 2 binary64) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(*.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) #s(literal 2 binary64)))
(*.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))) (/.f64 #s(literal 2 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (/.f64 #s(literal 1 binary64) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))) (fma.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (-.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (*.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 re re (fma.f64 im im (*.f64 re (-.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1/4 binary64) (*.f64 (log.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1/4 binary64))))
(hypot.f64 re im)
(hypot.f64 re (exp.f64 (log.f64 im)))
(hypot.f64 im re)
(hypot.f64 im (neg.f64 re))
(hypot.f64 im (exp.f64 (log.f64 re)))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 (neg.f64 re) (exp.f64 (log.f64 im)))
(hypot.f64 (exp.f64 (log.f64 re)) im)
(hypot.f64 (exp.f64 (log.f64 re)) (exp.f64 (log.f64 im)))
(hypot.f64 (exp.f64 (log.f64 im)) re)
(hypot.f64 (exp.f64 (log.f64 im)) (neg.f64 re))
(hypot.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 re)))
(fabs.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
(/.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))))
(/.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (sqrt.f64 (neg.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (sqrt.f64 (neg.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))) (sqrt.f64 (neg.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 im re)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 im re))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))) (neg.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1 binary64))
(pow.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) #s(literal 1/4 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im))) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))) #s(literal 1/8 binary64))
(pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))) #s(literal -1 binary64))
(*.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im)))))
(*.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (neg.f64 re))
(+.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(+.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(+.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal -1 binary64)))
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
(-.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(-.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(-.f64 #s(literal 0 binary64) (-.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(-.f64 (+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 0 binary64)) re)
(fma.f64 re #s(literal -1 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(fma.f64 (fma.f64 re re (*.f64 im im)) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (fma.f64 re re (*.f64 im im)) (/.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(fma.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (/.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (/.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(fma.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(fma.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))) (neg.f64 re))
(fma.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im)))) (neg.f64 re))
(fma.f64 #s(literal -1 binary64) re (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(fma.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (neg.f64 re))
(fma.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(fma.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 re re (fma.f64 im im (*.f64 re (-.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))) (fma.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (-.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(fma.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(neg.f64 (/.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(neg.f64 (/.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(/.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (-.f64 (fma.f64 re re (*.f64 im im)) (neg.f64 (*.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(/.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1 binary64)))
(/.f64 (neg.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (neg.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (neg.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))))) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re re)))) (*.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(/.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 (*.f64 re re) (fma.f64 re re (fma.f64 re re (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(/.f64 (*.f64 (fma.f64 re re (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 re re (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (*.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (*.f64 re (*.f64 re re)))) (*.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re re))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))))) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) #s(literal 1 binary64)) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 re re) (fma.f64 re re (fma.f64 re re (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (*.f64 (fma.f64 re re (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) #s(literal 1 binary64)) (*.f64 (fma.f64 re re (fma.f64 re re (*.f64 im im))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))) #s(literal 1 binary64)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (neg.f64 (neg.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))))) (neg.f64 (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (fma.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (*.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) #s(literal 3 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (fma.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (-.f64 (*.f64 re re) (fma.f64 re re (*.f64 im im))) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))) (fma.f64 (fma.f64 re re (*.f64 im im)) (/.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (*.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (+.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(/.f64 (*.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) #s(literal 1 binary64)) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))))) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))) (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(/.f64 (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) (/.f64 #s(literal 1 binary64) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 (*.f64 re re) (fma.f64 re re (fma.f64 re re (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (*.f64 (fma.f64 re re (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 re re (fma.f64 re re (*.f64 im im))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(*.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (*.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (/.f64 #s(literal 1 binary64) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(*.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (/.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(*.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (/.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (neg.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))))
(*.f64 (neg.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))))
(*.f64 (/.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 re re (fma.f64 im im (*.f64 re (-.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(*.f64 (/.f64 (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re))) (fma.f64 re re (*.f64 (+.f64 re im) (-.f64 im re)))) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (/.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))) (fma.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (-.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (*.f64 im im))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))
(*.f64 (/.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (fma.f64 re re (fma.f64 im im (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))

eval116.0ms (1.4%)

Memory
-40.3MiB live, 147.5MiB allocated
Compiler

Compiled 15 858 to 2 382 computations (85% saved)

prune125.0ms (1.5%)

Memory
-4.1MiB live, 117.0MiB allocated
Pruning

10 alts after pruning (10 fresh and 0 done)

PrunedKeptTotal
New42010430
Fresh000
Picked101
Done000
Total42110431
Accuracy
99.8%
Counts
431 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
43.7%
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
80.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
24.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64)))))) re))))
53.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
50.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
16.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
27.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
50.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
27.2%
(*.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
27.2%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
Compiler

Compiled 282 to 202 computations (28.4% saved)

simplify247.0ms (3%)

Memory
26.0MiB live, 98.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
cost-diff0
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
cost-diff0
(*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
cost-diff0
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
cost-diff0
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
cost-diff0
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
cost-diff0
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
cost-diff0
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
cost-diff0
(*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
cost-diff0
(sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
cost-diff0
(*.f64 im #s(literal 2 binary64))
cost-diff0
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))
cost-diff0
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
cost-diff0
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
cost-diff0
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
cost-diff5120
(hypot.f64 re im)
Rules
3 024×lower-fma.f32
3 022×lower-fma.f64
2 420×lower-*.f32
2 398×lower-*.f64
1 580×unsub-neg
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
043295
070295
1102295
2171295
3311295
4506295
5711295
6982295
71351295
82691295
93663295
103850295
114056295
124236295
134273295
145112295
155500295
165502295
175502295
185502295
195502295
205502295
215502295
225506295
05506295
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
#s(literal 2 binary64)
(-.f64 (hypot.f64 re im) re)
(hypot.f64 re im)
re
im
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
#s(literal 1/2 binary64)
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))
(*.f64 im #s(literal 2 binary64))
im
#s(literal 2 binary64)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
(*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
#s(literal 2 binary64)
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
(-.f64 im re)
im
re
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
#s(literal 1/2 binary64)
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
re
(+.f64 #s(literal -2 binary64) (/.f64 re im))
#s(literal -2 binary64)
(/.f64 re im)
im
(*.f64 im #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
im
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(/.f64 #s(literal 1 binary64) re)
#s(literal 1 binary64)
re
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
#s(literal 2 binary64)
(-.f64 (hypot.f64 re im) re)
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
(hypot.f64 re im)
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
re
im
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im))))
#s(literal 1/2 binary64)
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im)))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
im
#s(literal 2 binary64)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
(*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
#s(literal 2 binary64)
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
(-.f64 im re)
im
re
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
#s(literal 1/2 binary64)
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
re
(+.f64 #s(literal -2 binary64) (/.f64 re im))
#s(literal -2 binary64)
(/.f64 re im)
im
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
#s(literal 2 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))
im
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(/.f64 #s(literal 1 binary64) re)
#s(literal 1 binary64)
re
(sqrt.f64 #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize222.0ms (2.7%)

Memory
-20.6MiB live, 219.2MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.078125
(*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
accuracy0.22265625
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
accuracy0.23503876953688405
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
accuracy13.890257317930619
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
accuracy0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
accuracy0.0390625
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
accuracy5.53931841980846
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))
accuracy16.388278988489283
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
accuracy0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
accuracy0.00390625
(*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
accuracy5.53931841980846
(sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
accuracy16.53520230712609
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
accuracy0
(*.f64 im #s(literal 2 binary64))
accuracy0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
accuracy5.53931841980846
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))
accuracy15.86743166407591
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))
accuracy0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
accuracy0.00390625
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
accuracy5.53931841980846
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
accuracy6.815575154833727
(-.f64 (hypot.f64 re im) re)
Samples
58.0ms59×0valid
58.0ms18×3valid
25.0ms130×0invalid
18.0ms30×2valid
7.0ms19×1valid
Compiler

Compiled 302 to 27 computations (91.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 55.0ms
ival-hypot: 19.0ms (34.3% of total)
ival-mult: 15.0ms (27.1% of total)
ival-sqrt: 7.0ms (12.6% of total)
ival-div: 4.0ms (7.2% of total)
adjust: 4.0ms (7.2% of total)
ival-sub: 3.0ms (5.4% of total)
ival-add: 3.0ms (5.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series53.0ms (0.6%)

Memory
-4.4MiB live, 70.4MiB allocated
Counts
21 → 468
Calls
Call 1
Inputs
#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())
#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())
Outputs
#s(alt im (taylor 0 re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (+ im (* 1/2 (/ (pow re 2) im))) (taylor 0 re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt re (taylor inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))) (taylor inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 re) (taylor -inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt re (taylor 0 im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (+ re (* 1/2 (/ (pow im 2) re))) (taylor 0 im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor -inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor -inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))) (taylor -inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (*.f64 im #s(literal 2 binary64)) (patch (*.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow re 2) im) (taylor inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow re 2) im) (taylor -inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re)))) (taylor -inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im))) (taylor -inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im))) (taylor -inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow re 2) im) (taylor 0 im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* im re)) (pow re 2)) im) (taylor 0 im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im) (taylor 0 im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im) (taylor 0 im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (- (* 2 (/ re im)) 2))) (taylor -inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2))) (taylor -inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2))) (taylor -inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (patch (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
Calls

117 calls:

TimeVariablePointExpression
9.0ms
re
@0
(* im (* (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (sqrt 2) 1/2)))
4.0ms
im
@0
(* im (* (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (sqrt 2) 1/2)))
1.0ms
re
@-inf
(* im (* (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (sqrt 2) 1/2)))
1.0ms
im
@inf
(* im (* (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (sqrt 2) 1/2)))
1.0ms
re
@-inf
(* (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (sqrt 2) 1/2))

simplify461.0ms (5.7%)

Memory
5.9MiB live, 415.0MiB allocated
Algorithm
egg-herbie
Rules
11 562×lower-fma.f64
11 562×lower-fma.f32
8 468×lower-*.f64
8 468×lower-*.f32
3 146×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
058712038
1191011306
2670511230
0838010718
Stop Event
iter limit
node limit
Counts
468 → 460
Calls
Call 1
Inputs
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(/ (pow re 2) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* 2 im)
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))))
(* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))))
(* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))))
(* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
Outputs
im
(+ im (* 1/2 (/ (pow re 2) im)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) im) im)
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(fma.f64 (*.f64 re re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) im)
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(fma.f64 (*.f64 re re) (fma.f64 (*.f64 re re) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1/2 binary64) im)) im)
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) re) re)
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(fma.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re)))) re)
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(fma.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) re)
(* -1 re)
(neg.f64 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 1 binary64)) (neg.f64 re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) #s(literal 1 binary64))) (neg.f64 re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(neg.f64 (fma.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) re) re)
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)) re)
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)) re)
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64)))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(fma.f64 im (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) im)
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(fma.f64 im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64))))) im)
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(neg.f64 (*.f64 im (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(neg.f64 (fma.f64 im (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(neg.f64 (fma.f64 im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64))))) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/32 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64)) (*.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal -1/4 binary64)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/256 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) #s(literal -1/16 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (neg.f64 re) re) re)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)))) (*.f64 re (*.f64 re re))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 im im))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(neg.f64 (*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (neg.f64 (*.f64 im (*.f64 im im)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (fma.f64 re (fma.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) im)) #s(literal -2 binary64))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re)))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re)))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(*.f64 (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64)) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 im (/.f64 im (*.f64 re re)) (fma.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) #s(literal -1/4 binary64) #s(literal 4 binary64))) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re)))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (neg.f64 re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -5/64 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal -1/4 binary64) (fma.f64 re (/.f64 re (*.f64 im im)) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(neg.f64 (*.f64 im (fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(*.f64 (neg.f64 im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(neg.f64 (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (fma.f64 re re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 im im))) im)) im))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/32 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64)) (*.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal -1/4 binary64)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/256 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) #s(literal -1/16 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (neg.f64 re) re) re)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)))) (*.f64 re (*.f64 re re))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 im im))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(neg.f64 (*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (neg.f64 (*.f64 im (*.f64 im im)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (fma.f64 re (fma.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) im)) #s(literal -2 binary64))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re)))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re)))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(*.f64 (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64)) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 im (/.f64 im (*.f64 re re)) (fma.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) #s(literal -1/4 binary64) #s(literal 4 binary64))) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re)))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (neg.f64 re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -5/64 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal -1/4 binary64) (fma.f64 re (/.f64 re (*.f64 im im)) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(neg.f64 (*.f64 im (fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(*.f64 (neg.f64 im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(neg.f64 (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (fma.f64 re re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 im im))) im)) im))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/32 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64)) (*.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal -1/4 binary64)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/256 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) #s(literal -1/16 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (neg.f64 re) re) re)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)))) (*.f64 re (*.f64 re re))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 im im))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(neg.f64 (*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (neg.f64 (*.f64 im (*.f64 im im)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (fma.f64 re (fma.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) im)) #s(literal -2 binary64))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re)))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re)))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(*.f64 (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64)) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 im (/.f64 im (*.f64 re re)) (fma.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) #s(literal -1/4 binary64) #s(literal 4 binary64))) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re)))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (neg.f64 re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -5/64 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal -1/4 binary64) (fma.f64 re (/.f64 re (*.f64 im im)) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(neg.f64 (*.f64 im (fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(*.f64 (neg.f64 im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(neg.f64 (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (fma.f64 re re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 im im))) im)) im))))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(fma.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 re im) #s(literal -1 binary64)) im)
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) im)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (fma.f64 im (*.f64 im #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal -1/8 binary64)) (*.f64 re re))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (fma.f64 im (*.f64 im #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 (*.f64 re re) (*.f64 re re))))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (fma.f64 im (*.f64 im #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 (*.f64 re re) (*.f64 re re)))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64)) (neg.f64 re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64))) (neg.f64 re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 re))
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 im (*.f64 im (fma.f64 (*.f64 im im) (fma.f64 im (*.f64 im (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) #s(literal -5/128 binary64) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re))))
im
(* im (+ 1 (* -1 (/ re im))))
(-.f64 im (/.f64 (*.f64 im re) im))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 1 binary64))) (/.f64 re im)))
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (/ re im))))
(neg.f64 (fma.f64 im (/.f64 re im) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(fma.f64 im (/.f64 (fma.f64 (/.f64 (*.f64 re re) im) #s(literal -1/2 binary64) (neg.f64 re)) im) (neg.f64 im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(neg.f64 (fma.f64 im (/.f64 (+.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) im) re) im) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/32 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64)) (*.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal -1/4 binary64)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/256 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (fma.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) #s(literal -1/16 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (neg.f64 re) re) re)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)))) (*.f64 re (*.f64 re re))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 im im))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(neg.f64 (*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (neg.f64 (*.f64 im (*.f64 im im)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (fma.f64 re (fma.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) im)) #s(literal -2 binary64))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re)))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re)))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(*.f64 (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64)) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 im (/.f64 im (*.f64 re re)) (fma.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) #s(literal -1/4 binary64) #s(literal 4 binary64))) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re)))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (neg.f64 re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -5/64 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal -1/4 binary64) (fma.f64 re (/.f64 re (*.f64 im im)) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(neg.f64 (*.f64 im (fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(*.f64 (neg.f64 im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(neg.f64 (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (fma.f64 re re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 im im))) im)) im))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (fma.f64 im (/.f64 #s(literal 2 binary64) (*.f64 re re)) (/.f64 #s(literal -2 binary64) re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (fma.f64 im (/.f64 #s(literal 2 binary64) (*.f64 re re)) (/.f64 #s(literal -2 binary64) re))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 im re) #s(literal 2 binary64)) re)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 im re) #s(literal 2 binary64)) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (*.f64 re (fma.f64 im #s(literal -2 binary64) re)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (fma.f64 im (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) (*.f64 re re)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (fma.f64 im (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) (*.f64 re re)) im)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(neg.f64 (*.f64 im (fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal -2 binary64))))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (neg.f64 im) (-.f64 #s(literal -2 binary64) (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) im)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (neg.f64 im) (-.f64 #s(literal -2 binary64) (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) im)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/32 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64)) (*.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal -1/4 binary64)) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(neg.f64 (*.f64 im (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (neg.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (neg.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (neg.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (neg.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(fma.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 re im) #s(literal -1 binary64)) im)
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) im)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (fma.f64 im (*.f64 im #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal -1/8 binary64)) (*.f64 re re))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (fma.f64 im (*.f64 im #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 (*.f64 re re) (*.f64 re re))))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (fma.f64 im (*.f64 im #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 (*.f64 re re) (*.f64 re re)))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64)) (neg.f64 re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64))) (neg.f64 re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(*.f64 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 re))
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 im (*.f64 im (fma.f64 (*.f64 im im) (fma.f64 im (*.f64 im (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) #s(literal -5/128 binary64) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re))))
im
(* im (+ 1 (* -1 (/ re im))))
(-.f64 im (/.f64 (*.f64 im re) im))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 1 binary64))) (/.f64 re im)))
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (/ re im))))
(neg.f64 (fma.f64 im (/.f64 re im) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(fma.f64 im (/.f64 (fma.f64 (/.f64 (*.f64 re re) im) #s(literal -1/2 binary64) (neg.f64 re)) im) (neg.f64 im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(neg.f64 (fma.f64 im (/.f64 (+.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) im) re) im) im))

rewrite559.0ms (6.9%)

Memory
18.3MiB live, 434.2MiB allocated
Rules
10 008×lower-fma.f32
10 006×lower-fma.f64
5 730×lower-*.f32
5 708×lower-*.f64
3 060×lower-/.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
043245
070241
1193230
21121218
08566218
Stop Event
iter limit
node limit
iter limit
Counts
21 → 363
Calls
Call 1
Inputs
(hypot.f64 re im)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
(*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(-.f64 (hypot.f64 re im) re)
Outputs
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))))
(hypot.f64 re im)
(hypot.f64 re (neg.f64 im))
(hypot.f64 re (exp.f64 (log.f64 im)))
(hypot.f64 im re)
(hypot.f64 im (neg.f64 re))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) (exp.f64 (log.f64 im)))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (exp.f64 (log.f64 im)) re)
(hypot.f64 (exp.f64 (log.f64 im)) (neg.f64 re))
(fabs.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))) (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))))
(/.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))))
(/.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (sqrt.f64 (fma.f64 im (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im))))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (sqrt.f64 (neg.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))))) (sqrt.f64 (neg.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im)))))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re (neg.f64 re) (*.f64 im im)))) (sqrt.f64 (fma.f64 re (neg.f64 re) (*.f64 im im))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (-.f64 im re) (+.f64 re im)))) (sqrt.f64 (*.f64 (-.f64 im re) (+.f64 re im))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))))) (neg.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im)))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))) (neg.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(pow.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1 binary64))
(pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im)))))))
(*.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im)))))))
(*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im)))))
(*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(*.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) (sqrt.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (sqrt.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(*.f64 (*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re #s(literal -2 binary64)))
(+.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(+.f64 (*.f64 (neg.f64 re) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)))
(fma.f64 re #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))) (*.f64 re #s(literal -2 binary64)))
(fma.f64 #s(literal 2 binary64) (neg.f64 re) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 #s(literal -2 binary64) re (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 #s(literal -1 binary64) (*.f64 re #s(literal 2 binary64)) (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 re) #s(literal 2 binary64) (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)))
(fma.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (*.f64 re #s(literal -2 binary64)))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (*.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
(/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
(/.f64 (*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) #s(literal 2 binary64)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))))) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) #s(literal 2 binary64))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 3 binary64)) (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re #s(literal -2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 re) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 re) #s(literal 2 binary64)) (*.f64 (neg.f64 re) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)) (*.f64 (neg.f64 re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re #s(literal -2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 re) #s(literal 2 binary64)) (*.f64 (neg.f64 re) #s(literal 2 binary64)))) (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64)) (*.f64 (neg.f64 re) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #s(literal 2 binary64))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) #s(literal 2 binary64)))
(*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (*.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(*.f64 (*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64))) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64)))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
(*.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
(pow.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
(*.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
(*.f64 (*.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
(*.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/4 binary64)))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))
(+.f64 (*.f64 re #s(literal -2 binary64)) (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 re re) im) (fma.f64 re #s(literal -2 binary64) (*.f64 im #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))))
(+.f64 (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) (/.f64 (*.f64 re re) im))
(+.f64 (fma.f64 im #s(literal 2 binary64) (/.f64 (*.f64 re re) im)) (*.f64 re #s(literal -2 binary64)))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))))
(-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(fma.f64 re #s(literal -2 binary64) (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64))))
(fma.f64 re (/.f64 re im) (fma.f64 re #s(literal -2 binary64) (*.f64 im #s(literal 2 binary64))))
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(fma.f64 #s(literal 2 binary64) (neg.f64 re) (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (*.f64 re re) (/.f64 #s(literal 1 binary64) im) (fma.f64 re #s(literal -2 binary64) (*.f64 im #s(literal 2 binary64))))
(fma.f64 #s(literal -2 binary64) re (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (/.f64 re im) re (fma.f64 re #s(literal -2 binary64) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) re (*.f64 im #s(literal 2 binary64)))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 re re) im) (fma.f64 re #s(literal -2 binary64) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (neg.f64 re) (/.f64 (neg.f64 re) im) (fma.f64 re #s(literal -2 binary64) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))))
(fma.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 2 binary64)) #s(literal 4 binary64))) re) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) im) (*.f64 re re) (fma.f64 re #s(literal -2 binary64) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -2 binary64) (/.f64 re im))) re) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64) (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 re re) im) #s(literal 1 binary64) (fma.f64 re #s(literal -2 binary64) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (fma.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re)) (/.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 re re) im) (-.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64)))))) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 re (neg.f64 re)) (/.f64 #s(literal -1 binary64) im) (fma.f64 re #s(literal -2 binary64) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im)))) (/.f64 #s(literal 1 binary64) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 2 binary64)) #s(literal 4 binary64))) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) re) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 2 binary64)) #s(literal 4 binary64))) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) re) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))
(neg.f64 (/.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64)))) (neg.f64 (fma.f64 re (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re #s(literal 2 binary64)))))))))
(neg.f64 (/.f64 (fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 im im) #s(literal -4 binary64))) (neg.f64 (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64))))) (fma.f64 re (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re #s(literal 2 binary64))))))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 im im) #s(literal -4 binary64)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 im (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))) (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 im (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (neg.f64 re)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
(/.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64)))) (fma.f64 re (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re #s(literal 2 binary64)))))))
(/.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64)))) (fma.f64 im (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))))
(/.f64 (fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 im im) #s(literal -4 binary64))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))
(/.f64 (neg.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64))))) (neg.f64 (fma.f64 re (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64))))) (neg.f64 (fma.f64 im (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 im im) #s(literal -4 binary64)))) (neg.f64 (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))))
(/.f64 (fma.f64 im (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (neg.f64 re)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (*.f64 (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))) (*.f64 (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64)))))) (neg.f64 (neg.f64 (fma.f64 re (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 im im) #s(literal -4 binary64))))) (neg.f64 (neg.f64 (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))))
(/.f64 (neg.f64 (fma.f64 im (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (neg.f64 re)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (neg.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (fma.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re)) (pow.f64 (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 re re) #s(literal 4 binary64) (-.f64 (*.f64 (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64))) (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64)))) (*.f64 (*.f64 re #s(literal -2 binary64)) (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) #s(literal 3 binary64)) (/.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im)))) (fma.f64 (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 (*.f64 re re) (/.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) (/.f64 (*.f64 re re) im)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (fma.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64))) (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64))))) (-.f64 (*.f64 re #s(literal -2 binary64)) (fma.f64 re (/.f64 re im) (*.f64 im #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))) (*.f64 (*.f64 re re) (/.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 (fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) (/.f64 (*.f64 re re) im)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))) (*.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))))
(*.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
(*.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 re (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re #s(literal 2 binary64))))))))
(*.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 im (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))))))
(*.f64 (fma.f64 re (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re #s(literal 2 binary64)))))) (*.f64 (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 re (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re #s(literal 2 binary64)))))))))
(*.f64 (fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 im im) #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64)))))
(*.f64 (neg.f64 (fma.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 im (*.f64 (*.f64 im im) #s(literal 8 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 re (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re #s(literal 2 binary64)))))))))
(*.f64 (neg.f64 (fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 im im) #s(literal -4 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal -2 binary64))))))
(*.f64 (fma.f64 im (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (neg.f64 re)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) im))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))))
(*.f64 #s(literal 1 binary64) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) im))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) im))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 (*.f64 im #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 im (/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 im (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 (/.f64 im (sqrt.f64 re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (sqrt.f64 re)))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)))
(exp.f64 (fma.f64 (neg.f64 (log.f64 re)) #s(literal 1/2 binary64) (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(exp.f64 (fma.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 re)) #s(literal 1/2 binary64))))
(sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64))))
(/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 re))
(/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 re)))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 re)))
(pow.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))
(*.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 re #s(literal -1/4 binary64))) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (neg.f64 re))
(+.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(+.f64 (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(+.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
(-.f64 #s(literal 0 binary64) (-.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(-.f64 (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(-.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(-.f64 (+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 0 binary64)) re)
(fma.f64 re #s(literal -1 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(fma.f64 (fma.f64 re re (*.f64 im im)) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 #s(literal 1 binary64) (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(fma.f64 #s(literal -1 binary64) re (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(fma.f64 (neg.f64 re) #s(literal 1 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(fma.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(fma.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))) #s(literal 1/2 binary64)) (neg.f64 re))
(fma.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im)))))) (neg.f64 re))
(fma.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im)))))) (neg.f64 re))
(fma.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im))) #s(literal 1/2 binary64)) (neg.f64 re))
(fma.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 re im) (-.f64 re im)))) (neg.f64 re))
(fma.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))) (neg.f64 re))
(fma.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (neg.f64 re))
(fma.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (neg.f64 re))
(neg.f64 (/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(neg.f64 (/.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 re re (fma.f64 im im (*.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) (fma.f64 re re (fma.f64 im im (*.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(/.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re)))) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re)))) (neg.f64 (fma.f64 re re (fma.f64 im im (*.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))) re)) (*.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))) (/.f64 #s(literal 1 binary64) re)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) #s(literal -1 binary64)) (*.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))) (neg.f64 re))) (*.f64 (sqrt.f64 (fma.f64 re (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 (-.f64 im re) (+.f64 re im))))) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) re)) (*.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 #s(literal 1 binary64) re)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) #s(literal -1 binary64)) (*.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) (neg.f64 re))) (*.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re re))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))))) (neg.f64 (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) (neg.f64 (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(/.f64 (fma.f64 re (*.f64 re (neg.f64 re)) (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (fma.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (*.f64 (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (-.f64 (*.f64 re re) (fma.f64 re re (*.f64 im im))) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))) (+.f64 (/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (*.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (+.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (fma.f64 re re (fma.f64 im im (*.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (*.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(*.f64 (neg.f64 (-.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(*.f64 (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))

eval145.0ms (1.8%)

Memory
13.9MiB live, 212.4MiB allocated
Compiler

Compiled 23 277 to 2 176 computations (90.7% saved)

prune99.0ms (1.2%)

Memory
-28.9MiB live, 250.3MiB allocated
Pruning

15 alts after pruning (11 fresh and 4 done)

PrunedKeptTotal
New8307837
Fresh145
Picked145
Done000
Total83215847
Accuracy
100.0%
Counts
847 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
52.9%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
43.7%
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
80.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
24.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64)))))) re))))
53.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
50.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
16.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
27.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
50.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
27.3%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im))))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
27.3%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
27.3%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
Compiler

Compiled 338 to 233 computations (31.1% saved)

simplify142.0ms (1.7%)

Memory
8.7MiB live, 103.3MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))
cost-diff0
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
cost-diff0
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
cost-diff0
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
cost-diff0
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
cost-diff0
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
cost-diff0
(sqrt.f64 re)
cost-diff0
(/.f64 im (sqrt.f64 re))
cost-diff0
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
cost-diff0
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
cost-diff0
(*.f64 re #s(literal -4 binary64))
cost-diff0
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))
cost-diff0
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
cost-diff0
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
cost-diff0
(sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
cost-diff0
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
Rules
1 376×lower-fma.f32
1 374×lower-fma.f64
1 208×lower-*.f32
1 186×lower-*.f64
674×distribute-lft-in
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
040289
065289
185289
2126289
3188289
4220289
5309289
6424289
7606289
81227289
91601289
102509289
112853289
123035289
133247289
143569289
153615289
163645289
173711289
183719289
193719289
203767289
214040289
04040233
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
#s(literal 1/2 binary64)
(sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
(-.f64 im re)
im
re
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
#s(literal 1/2 binary64)
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))
(*.f64 re #s(literal -4 binary64))
re
#s(literal -4 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(/.f64 im (sqrt.f64 re))
im
(sqrt.f64 re)
re
#s(literal 1/2 binary64)
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
#s(literal 2 binary64)
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
(fma.f64 re re (*.f64 im im))
re
(*.f64 im im)
im
#s(literal 1/2 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))
(/.f64 #s(literal 1/2 binary64) re)
#s(literal 1/2 binary64)
re
(*.f64 im #s(literal 1/2 binary64))
im
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
#s(literal 1/2 binary64)
(sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
(-.f64 im re)
im
re
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
#s(literal 1/2 binary64)
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))
(*.f64 re #s(literal -4 binary64))
re
#s(literal -4 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 im (sqrt.f64 re))
im
(sqrt.f64 re)
re
#s(literal 1/2 binary64)
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
#s(literal 2 binary64)
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
(fma.f64 re re (*.f64 im im))
re
(*.f64 im im)
im
#s(literal 1/2 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))
(/.f64 #s(literal 1/2 binary64) re)
#s(literal 1/2 binary64)
re
(*.f64 im #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) im)
im
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize118.0ms (1.4%)

Memory
13.1MiB live, 210.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.0859375
(sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))
accuracy0.1015625
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
accuracy0.18263627930532603
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
accuracy13.890257317930619
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.00390625
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
accuracy5.53931841980846
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
accuracy6.815575154833727
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
accuracy14.180319825227647
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
accuracy0
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
accuracy0
(sqrt.f64 re)
accuracy0.09765625
(/.f64 im (sqrt.f64 re))
accuracy13.890257317930619
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
accuracy0
(*.f64 re #s(literal -4 binary64))
accuracy0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
accuracy5.53931841980846
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))
accuracy30.89139206032552
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))
accuracy0.00390625
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
accuracy0.19597626953688402
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
accuracy5.553840909582893
(sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
accuracy16.53520230712609
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
Samples
28.0ms130×0invalid
15.0ms30×2valid
12.0ms18×3valid
12.0ms59×0valid
9.0ms19×1valid
Compiler

Compiled 259 to 30 computations (88.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 50.0ms
ival-mult: 19.0ms (38.1% of total)
ival-sqrt: 11.0ms (22.1% of total)
ival-hypot: 9.0ms (18% of total)
adjust: 4.0ms (8% of total)
ival-div: 3.0ms (6% of total)
ival-sub: 3.0ms (6% of total)
ival-add: 1.0ms (2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series40.0ms (0.5%)

Memory
-3.0MiB live, 78.8MiB allocated
Counts
21 → 468
Calls
Call 1
Inputs
#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())
#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())
#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())
#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())
#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())
Outputs
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt im)) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) re)) (* 1/2 (sqrt im))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) re))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/16 (sqrt (/ 1 (pow im 3))))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt im)) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im))))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (sqrt -1))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (sqrt im) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re))))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3))))))))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2)))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (sqrt im) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (sqrt -1))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (patch (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor 0 re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor 0 re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor 0 re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor 0 re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor inf re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor inf re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor inf re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor inf re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (*.f64 re #s(literal -4 binary64)) (patch (*.f64 re #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) (patch (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (patch (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (patch (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2))) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2))) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2))) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2))) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* 1/2 (/ (pow re 2) im))) (taylor 0 re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt re (taylor inf re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))) (taylor inf re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor inf re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor inf re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 re) (taylor -inf re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt re (taylor 0 im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* 1/2 (/ (pow im 2) re))) (taylor 0 im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor inf im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))) (taylor -inf im) (#s(alt (sqrt.f64 (fma.f64 re re (*.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (*.f64 im im))) #<representation binary64>) () ())) ())
Calls

117 calls:

TimeVariablePointExpression
2.0ms
re
@-inf
(sqrt (- (sqrt (+ (* re re) (* im im))) re))
1.0ms
re
@-inf
(* (* (sqrt (/ 1/2 re)) (* im 1/2)) (sqrt 2))
1.0ms
re
@-inf
(* (/ im (sqrt re)) 1/2)
1.0ms
im
@0
(* (sqrt (/ 1/2 re)) (* im 1/2))
1.0ms
re
@-inf
(* (sqrt (/ 1/2 re)) (* im 1/2))

simplify341.0ms (4.2%)

Memory
-0.5MiB live, 559.5MiB allocated
Algorithm
egg-herbie
Rules
9 856×lower-fma.f64
9 856×lower-fma.f32
7 714×lower-*.f64
7 714×lower-*.f32
4 674×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078811212
1263710605
2798010605
0800910171
Stop Event
iter limit
node limit
Counts
468 → 460
Calls
Call 1
Inputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* 1/2 (sqrt im))
(+ (* -1/4 (* (sqrt (/ 1 im)) re)) (* 1/2 (sqrt im)))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) re)))))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/16 (sqrt (/ 1 (pow im 3)))))))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(* 1/2 (sqrt im))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im)))))))
(* -1/2 (* (sqrt im) (sqrt -1)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(sqrt im)
(+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)))))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(sqrt im)
(* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))))
(* -1 (* (sqrt im) (sqrt -1)))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2)))
(* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2)))
(* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2)))
(* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2)))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (*.f64 #s(literal 1/32 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 (*.f64 #s(literal -1/1024 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re))) (*.f64 re (*.f64 re re))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))))) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal 1/16 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) re) re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (neg.f64 im))
(* 1/2 (sqrt im))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))
(+ (* -1/4 (* (sqrt (/ 1 im)) re)) (* 1/2 (sqrt im)))
(fma.f64 #s(literal 1/2 binary64) (sqrt.f64 im) (*.f64 (*.f64 #s(literal -1/4 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) re)))))
(fma.f64 re (fma.f64 (*.f64 #s(literal 1/16 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/16 (sqrt (/ 1 (pow im 3)))))))))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 #s(literal 1/32 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(fma.f64 (/.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))))
(fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/1024 binary64) (/.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/32 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2)))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))))
(* 1/2 (sqrt im))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im)))))
(*.f64 im (fma.f64 (*.f64 #s(literal -1/4 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (fma.f64 (*.f64 #s(literal -1/4 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im)))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) #s(literal 1/16 binary64) (fma.f64 (*.f64 #s(literal -1/4 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -1/2 (* (sqrt im) (sqrt -1)))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) re) re) (sqrt.f64 #s(literal -1 binary64))) (/.f64 #s(literal 3/16 binary64) (*.f64 im (*.f64 im im))))) (neg.f64 im))
(sqrt im)
(sqrt.f64 im)
(+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))
(fma.f64 (*.f64 re #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 im))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)))))
(fma.f64 re (fma.f64 (*.f64 re #s(literal 1/8 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64))) (sqrt.f64 im))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64) (*.f64 (*.f64 #s(literal 1/16 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64))) (sqrt.f64 im))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(fma.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(fma.f64 im (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (fma.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(fma.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (/.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(neg.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 re) (*.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))))
(sqrt im)
(sqrt.f64 im)
(* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(*.f64 im (fma.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) re (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))
(*.f64 im (fma.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) re (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))))
(*.f64 im (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) re (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* -1 (* (sqrt im) (sqrt -1)))
(neg.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(neg.f64 (*.f64 im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(neg.f64 (*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(neg.f64 (*.f64 im (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) re) re) (sqrt.f64 #s(literal -1 binary64))) #s(literal 3/8 binary64)) (*.f64 im (*.f64 im im))))))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(fma.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 re im) #s(literal -1 binary64)) im)
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) im)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 im im) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 im im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) (/.f64 #s(literal 5/64 binary64) (pow.f64 re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 im im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(neg.f64 (*.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))) (neg.f64 re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(neg.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))))
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -5/128 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)))
im
(* im (+ 1 (* -1 (/ re im))))
(fma.f64 im (/.f64 re (neg.f64 im)) im)
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64))) (/.f64 re im)))
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (/ re im))))
(neg.f64 (fma.f64 im (/.f64 re im) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(neg.f64 (fma.f64 im (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/2 binary64)) im) re) (neg.f64 im)) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(neg.f64 (fma.f64 im (/.f64 (-.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 re re) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) (neg.f64 im)) re) (neg.f64 im)) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (*.f64 #s(literal 1/32 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 (*.f64 #s(literal -1/1024 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re))) (*.f64 re (*.f64 re re))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))))) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal 1/16 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) re) re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (neg.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 re #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal 1/8 binary64)))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (fma.f64 re (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(fma.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 (*.f64 #s(literal -1/512 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -2 binary64))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) #s(literal -1/16 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (fma.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1/16 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))))) (sqrt.f64 re)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1/16 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (sqrt.f64 im)))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (neg.f64 im) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 #s(literal -1 binary64)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 #s(literal -1 binary64))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (-.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) re) re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 3/8 binary64) (*.f64 im (*.f64 im im))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (fma.f64 re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im)) #s(literal -2 binary64))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 re re)) (fma.f64 im im (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 re re)) (fma.f64 im im (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (*.f64 (pow.f64 im #s(literal 8 binary64)) (/.f64 #s(literal 5/64 binary64) (pow.f64 re #s(literal 6 binary64))))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(neg.f64 (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) #s(literal -5/64 binary64) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(neg.f64 (*.f64 im (fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(*.f64 (neg.f64 im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(neg.f64 (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (fma.f64 re #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 im im)) (*.f64 re re)) (neg.f64 im))) im))))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (*.f64 #s(literal 1/32 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 (*.f64 #s(literal -1/1024 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re))) (*.f64 re (*.f64 re re))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))))) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal 1/16 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) re) re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (neg.f64 im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(neg.f64 (neg.f64 (sqrt.f64 re)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(neg.f64 (neg.f64 (sqrt.f64 re)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(neg.f64 (neg.f64 (sqrt.f64 re)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(neg.f64 (neg.f64 (sqrt.f64 re)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (*.f64 #s(literal 1/32 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 (*.f64 #s(literal -1/1024 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re))) (*.f64 re (*.f64 re re))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))))) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal 1/16 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) re) re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (neg.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 re #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal 1/8 binary64)))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (fma.f64 re (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(fma.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 (*.f64 #s(literal -1/512 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -2 binary64))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) #s(literal -1/16 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (fma.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1/16 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))))) (sqrt.f64 re)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal -1/16 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (sqrt.f64 im)))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (neg.f64 im) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 #s(literal -1 binary64)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 #s(literal -1 binary64))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (neg.f64 im) (-.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) re) re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 3/8 binary64) (*.f64 im (*.f64 im im))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (fma.f64 re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im)) #s(literal -2 binary64))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 re re)) (fma.f64 im im (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 re re)) (fma.f64 im im (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (*.f64 (pow.f64 im #s(literal 8 binary64)) (/.f64 #s(literal 5/64 binary64) (pow.f64 re #s(literal 6 binary64))))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(neg.f64 (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) #s(literal -5/64 binary64) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(neg.f64 (*.f64 im (fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(*.f64 (neg.f64 im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(neg.f64 (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (fma.f64 re #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 im im)) (*.f64 re re)) (neg.f64 im))) im))))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(fma.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 re im) #s(literal -1 binary64)) im)
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) im)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 im im) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 im im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) (/.f64 #s(literal 5/64 binary64) (pow.f64 re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 im im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(neg.f64 (*.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))) (neg.f64 re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(neg.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))))
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -5/128 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)))
im
(* im (+ 1 (* -1 (/ re im))))
(fma.f64 im (/.f64 re (neg.f64 im)) im)
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(*.f64 im (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64))) (/.f64 re im)))
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (/ re im))))
(neg.f64 (fma.f64 im (/.f64 re im) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(neg.f64 (fma.f64 im (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/2 binary64)) im) re) (neg.f64 im)) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(neg.f64 (fma.f64 im (/.f64 (-.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 re re) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) (neg.f64 im)) re) (neg.f64 im)) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (*.f64 #s(literal 1/32 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (fma.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 (*.f64 #s(literal -1/1024 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re))) (*.f64 re (*.f64 re re))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64)))))) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal 1/16 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) re) re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (neg.f64 im))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 im (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))
(* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))
(* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))
(* 1/2 (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1/2 binary64))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) im) im)
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(fma.f64 (*.f64 re re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) im)
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(fma.f64 (*.f64 re re) (fma.f64 (*.f64 re re) (fma.f64 #s(literal 1/16 binary64) (*.f64 re (/.f64 re (pow.f64 im #s(literal 5 binary64)))) (/.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1/2 binary64) im)) im)
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(fma.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) re)
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(fma.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) re)
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(fma.f64 re (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(* -1 re)
(neg.f64 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(neg.f64 (fma.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1 binary64))) (neg.f64 re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(neg.f64 (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) re) re)
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)) re)
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)) re)
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(fma.f64 im (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) im)
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(fma.f64 im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) im)
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(fma.f64 im (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) im)
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(neg.f64 (fma.f64 im (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(neg.f64 (fma.f64 im (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(neg.f64 (fma.f64 im (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) im))

rewrite263.0ms (3.2%)

Memory
-10.8MiB live, 431.5MiB allocated
Rules
5 466×lower-fma.f32
5 464×lower-fma.f64
4 636×lower-*.f32
4 614×lower-*.f64
2 770×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
040249
065249
1146248
2694246
36307246
08591190
Stop Event
iter limit
node limit
iter limit
Counts
21 → 430
Calls
Call 1
Inputs
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
(sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))
(*.f64 re #s(literal -4 binary64))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(/.f64 im (sqrt.f64 re))
(sqrt.f64 re)
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
(*.f64 (sqrt.f64 (*.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))))
(*.f64 (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64))) (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))
(*.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64))) (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
(exp.f64 (*.f64 (log.f64 (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
(pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64)) (pow.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #s(literal 1/4 binary64)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/4 binary64))) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))))
(exp.f64 (*.f64 (log.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))) #s(literal 1/2 binary64)))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/4 binary64)))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))
(*.f64 re #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) re)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im))) #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 im (sqrt.f64 re)))))
(neg.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) (neg.f64 (sqrt.f64 re))))
(neg.f64 (/.f64 (*.f64 im #s(literal -1/2 binary64)) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 re) (neg.f64 im)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64))) (sqrt.f64 re))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (/.f64 (*.f64 im #s(literal -1/2 binary64)) #s(literal -1 binary64)) (sqrt.f64 re))
(pow.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (neg.f64 im) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 im) (/.f64 #s(literal 1/2 binary64) (neg.f64 (sqrt.f64 re))))
(*.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 im (sqrt.f64 re))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 im (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 (neg.f64 im) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (neg.f64 (sqrt.f64 re))) (neg.f64 im))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 re) im)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (/.f64 im (sqrt.f64 re))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 re))) (neg.f64 (/.f64 im (sqrt.f64 re))))
(neg.f64 (neg.f64 (/.f64 im (sqrt.f64 re))))
(neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 im (sqrt.f64 re)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 re) im)))
(/.f64 im (sqrt.f64 re))
(/.f64 (neg.f64 im) (neg.f64 (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 re) (neg.f64 im)))
(/.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(/.f64 (/.f64 (neg.f64 im) #s(literal -1 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 im)) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (neg.f64 im) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 re)))
(pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1 binary64))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1 binary64))
(*.f64 (neg.f64 im) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (neg.f64 (/.f64 im (sqrt.f64 re))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (neg.f64 im))
(*.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (neg.f64 im)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 re)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 re #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 re))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 re)))
(sqrt.f64 re)
(neg.f64 (neg.f64 (sqrt.f64 re)))
(/.f64 (sqrt.f64 re) #s(literal 1 binary64))
(/.f64 (neg.f64 (sqrt.f64 re)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64))
(pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 re) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (/.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) (sqrt.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) (sqrt.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) (sqrt.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (sqrt.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(*.f64 (*.f64 (sqrt.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re #s(literal -2 binary64)))
(fma.f64 re #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))) (*.f64 re #s(literal -2 binary64)))
(fma.f64 #s(literal 2 binary64) (neg.f64 re) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(fma.f64 (neg.f64 re) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 #s(literal -1 binary64) (*.f64 re #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(fma.f64 #s(literal -2 binary64) re (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(fma.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (*.f64 re #s(literal -2 binary64)))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (fma.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
(/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))))) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 3 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64)))) (-.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re #s(literal -2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))))) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) #s(literal 2 binary64)) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(pow.f64 (/.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) #s(literal 2 binary64))
(*.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) #s(literal 2 binary64)))
(*.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 2 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) #s(literal 2 binary64)))
(*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (/.f64 #s(literal 2 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(*.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (fma.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))) (fma.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)) (*.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (-.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (*.f64 im im))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 re (-.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
(+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (neg.f64 re))
(+.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(+.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(+.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal -1 binary64)))
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
(-.f64 #s(literal 0 binary64) (-.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(-.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(-.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(-.f64 (+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 0 binary64)) re)
(fma.f64 re #s(literal -1 binary64) (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(fma.f64 (fma.f64 re re (*.f64 im im)) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (fma.f64 re re (*.f64 im im)) (/.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(fma.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (/.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (/.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(fma.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im)))))) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(fma.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 im re) (+.f64 re im))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 #s(literal -1 binary64) re (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(fma.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) #s(literal 1/2 binary64)) (neg.f64 re))
(fma.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))) (neg.f64 re))
(fma.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))) (neg.f64 re))
(fma.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 im re) (+.f64 re im))) #s(literal 1/2 binary64)) (neg.f64 re))
(fma.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 im re) (+.f64 re im)))) (neg.f64 re))
(fma.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))) (neg.f64 re))
(fma.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (neg.f64 re))
(fma.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 3/4 binary64)) (/.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 3/4 binary64)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(fma.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (neg.f64 re))
(fma.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 re (-.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(fma.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))) (fma.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)) (*.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (-.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (*.f64 im im))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(fma.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(neg.f64 (/.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(neg.f64 (/.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(neg.f64 (/.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
(/.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (fma.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
(/.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (fma.f64 re re (-.f64 (fma.f64 re re (*.f64 im im)) (neg.f64 (*.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))))
(/.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(/.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (neg.f64 (fma.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (neg.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(/.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (neg.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 (*.f64 re re) (fma.f64 im im (fma.f64 re re (*.f64 re re))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))))))
(/.f64 (fma.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))) (neg.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re re))))) (*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (*.f64 (fma.f64 im im (fma.f64 re re (*.f64 re re))) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 im im (fma.f64 re re (*.f64 re re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re re))) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))) (neg.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re re))))) #s(literal 1 binary64)) (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (neg.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) #s(literal 1 binary64)) (*.f64 (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (neg.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 re re) (fma.f64 im im (fma.f64 re re (*.f64 re re))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (*.f64 (fma.f64 im im (fma.f64 re re (*.f64 re re))) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) #s(literal 1 binary64)) (*.f64 (fma.f64 im im (fma.f64 re re (*.f64 re re))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) #s(literal 1 binary64)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))))) (neg.f64 (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))) (neg.f64 (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (fma.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (*.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))))
(/.f64 (-.f64 (*.f64 re re) (fma.f64 re re (*.f64 im im))) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))) (fma.f64 (fma.f64 re re (*.f64 im im)) (/.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (/.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(/.f64 (-.f64 (*.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (*.f64 (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))) (+.f64 (/.f64 (fma.f64 re re (*.f64 im im)) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (/.f64 (*.f64 re re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) #s(literal 1 binary64)) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
(/.f64 (*.f64 (fma.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))) (neg.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re re))))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))) (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))))
(/.f64 (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (neg.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(/.f64 (*.f64 (fma.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) (neg.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 (*.f64 re re) (fma.f64 im im (fma.f64 re re (*.f64 re re))) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))
(/.f64 (*.f64 (*.f64 (fma.f64 im im (fma.f64 re re (*.f64 re re))) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 im im (fma.f64 re re (*.f64 re re))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(*.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 re) (-.f64 (neg.f64 re) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (*.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (/.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))))
(*.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (/.f64 (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))))
(*.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))))
(*.f64 (neg.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im)))) (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))))
(*.f64 (/.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im)))) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))
(*.f64 (/.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (fma.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)))))) (fma.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im)) (*.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (-.f64 (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im))))) (fma.f64 re re (*.f64 im im))))))
(*.f64 (/.f64 (-.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (*.f64 re (*.f64 re re))) (*.f64 (fma.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))) (-.f64 (fma.f64 re re (*.f64 im im)) (*.f64 re (+.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))))))
(*.f64 (/.f64 (fma.f64 re re (*.f64 (-.f64 im re) (+.f64 re im))) (fma.f64 re (*.f64 re re) (*.f64 (fma.f64 re re (*.f64 im im)) (sqrt.f64 (fma.f64 re re (*.f64 im im)))))) (fma.f64 re (-.f64 re (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (fma.f64 re re (*.f64 im im))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (*.f64 re #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 re))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (sqrt.f64 re))
(/.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 re #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (*.f64 re #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1/2 binary64)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 re)))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(pow.f64 (/.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 2 binary64))) im))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 2 binary64)))))
(*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 2 binary64)))))
(*.f64 im (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 im (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 im (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 2 binary64))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 re)))
(*.f64 (/.f64 im (sqrt.f64 (*.f64 re #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))))
(*.f64 (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal 2 binary64)))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 im (sqrt.f64 (*.f64 re #s(literal 2 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 2 binary64))) im) #s(literal 1/2 binary64))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal 2 binary64))))) im)
(*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) im)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64))) (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) im)
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (*.f64 re #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))))
(/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 re))
(/.f64 (neg.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (sqrt.f64 (*.f64 re #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (neg.f64 (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) (sqrt.f64 (*.f64 re #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im)) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) im)) (neg.f64 (sqrt.f64 re)))
(/.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(pow.f64 (/.f64 (sqrt.f64 re) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 (*.f64 re #s(literal 2 binary64)))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re)))
(*.f64 (/.f64 im (sqrt.f64 (*.f64 re #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal 2 binary64)))) im)
(*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64))) (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (log.f64 (*.f64 re #s(literal 2 binary64))))))
(exp.f64 (*.f64 (log.f64 (*.f64 re #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 re #s(literal 2 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 1/2 binary64) re))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 re #s(literal 2 binary64)))))) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))
(neg.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (neg.f64 (sqrt.f64 re))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)))
(/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 re #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 re #s(literal 2 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (*.f64 re #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 re)))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re #s(literal -2 binary64))))
(/.f64 (neg.f64 (sqrt.f64 #s(literal -1/2 binary64))) (neg.f64 (sqrt.f64 (neg.f64 re))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 re))
(/.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 re))
(pow.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 1/2 binary64))
(pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (*.f64 re #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 re #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 re #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))
(*.f64 (sqrt.f64 #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 re))))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64)) (pow.f64 (*.f64 re #s(literal 2 binary64)) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (fma.f64 re re (*.f64 im im)))) #s(literal 2 binary64)))
(hypot.f64 re im)
(hypot.f64 re (exp.f64 (log.f64 im)))
(hypot.f64 im re)
(hypot.f64 im (neg.f64 re))
(hypot.f64 im (exp.f64 (log.f64 re)))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 (neg.f64 re) (exp.f64 (log.f64 im)))
(hypot.f64 (exp.f64 (log.f64 re)) im)
(hypot.f64 (exp.f64 (log.f64 re)) (exp.f64 (log.f64 im)))
(hypot.f64 (exp.f64 (log.f64 im)) re)
(hypot.f64 (exp.f64 (log.f64 im)) (neg.f64 re))
(hypot.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 re)))
(fabs.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))))
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))))
(/.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im))))))) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (sqrt.f64 (neg.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im)))))))) (sqrt.f64 (neg.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (-.f64 im re) (+.f64 re im)))) (sqrt.f64 (*.f64 (-.f64 im re) (+.f64 re im))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im)))))))) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))) (neg.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) #s(literal 1 binary64))
(pow.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (fma.f64 re re (*.f64 im im))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 re re (*.f64 im im)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))) (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im))))) #s(literal -1 binary64))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(*.f64 (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im (*.f64 im (*.f64 im im))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)) (*.f64 im (*.f64 im (*.f64 im im)))))))
(*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 im re) (+.f64 re im))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 (-.f64 im re) (+.f64 re im)))))
(*.f64 (sqrt.f64 (*.f64 (fma.f64 re re (*.f64 im im)) (*.f64 (+.f64 re im) (-.f64 re im)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(*.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (sqrt.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))))

eval102.0ms (1.2%)

Memory
-7.1MiB live, 221.8MiB allocated
Compiler

Compiled 22 848 to 2 593 computations (88.7% saved)

prune147.0ms (1.8%)

Memory
7.9MiB live, 285.3MiB allocated
Pruning

16 alts after pruning (7 fresh and 9 done)

PrunedKeptTotal
New8864890
Fresh336
Picked055
Done044
Total88916905
Accuracy
100.0%
Counts
905 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
52.9%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
43.7%
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
16.1%
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
80.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
24.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64)))))) re))))
53.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
50.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
27.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
50.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
27.3%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
27.3%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im))))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
27.3%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
Compiler

Compiled 284 to 194 computations (31.7% saved)

simplify137.0ms (1.7%)

Memory
-9.7MiB live, 83.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(sqrt.f64 re)
cost-diff0
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
cost-diff0
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
cost-diff1088
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
cost-diff0
(sqrt.f64 re)
cost-diff0
(/.f64 (sqrt.f64 re) im)
cost-diff0
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
cost-diff384
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
cost-diff0
(/.f64 (*.f64 im im) re)
cost-diff0
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))
cost-diff0
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))
cost-diff0
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
cost-diff0
(sqrt.f64 re)
cost-diff0
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
cost-diff0
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
cost-diff0
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
cost-diff0
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
cost-diff0
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)
cost-diff0
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))
cost-diff0
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
Rules
952×lower-fma.f64
952×lower-fma.f32
816×lower-*.f32
806×lower-*.f64
468×div-sub
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
033237
048233
169233
296233
3131233
4157233
5197233
6256233
7342233
8392233
9433233
10511233
11598233
12714233
13906233
141399233
151841233
162169233
172289233
182403233
192592233
202935233
213299233
223329233
233329233
243337233
253341233
03341198
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(/.f64 #s(literal 1 binary64) re)
#s(literal 1 binary64)
re
im
#s(literal 1/2 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
#s(literal 1/2 binary64)
(sqrt.f64 re)
re
im
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))
(/.f64 (*.f64 im im) re)
(*.f64 im im)
im
re
#s(literal 1/2 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
#s(literal 1/2 binary64)
(/.f64 (sqrt.f64 re) im)
(sqrt.f64 re)
re
im
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
#s(literal 1/2 binary64)
(sqrt.f64 re)
re
(/.f64 #s(literal 1 binary64) im)
#s(literal 1 binary64)
im
Outputs
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(/.f64 #s(literal 1 binary64) re)
#s(literal 1 binary64)
re
im
#s(literal 1/2 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
#s(literal 1/2 binary64)
(sqrt.f64 re)
re
im
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))
(/.f64 (*.f64 im im) re)
(*.f64 im im)
im
re
#s(literal 1/2 binary64)
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
#s(literal 1/2 binary64)
(/.f64 (sqrt.f64 re) im)
(sqrt.f64 re)
re
im
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
#s(literal 1/2 binary64)
(sqrt.f64 re)
re
(/.f64 #s(literal 1 binary64) im)
#s(literal 1 binary64)
im

localize99.0ms (1.2%)

Memory
-2.4MiB live, 234.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0
(sqrt.f64 re)
accuracy0.109375
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
accuracy0.12890625
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
accuracy13.890257317930619
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
accuracy0
(sqrt.f64 re)
accuracy0.0546875
(/.f64 (sqrt.f64 re) im)
accuracy0.18468710864360888
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
accuracy13.890257317930619
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
accuracy0
(*.f64 im im)
accuracy2.6180070714185657
(/.f64 (*.f64 im im) re)
accuracy5.53931841980846
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))
accuracy13.870286553350116
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))
accuracy0
(sqrt.f64 re)
accuracy0.078125
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
accuracy0.12890625
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
accuracy13.890257317930619
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
accuracy0
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))
accuracy0.0546875
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
accuracy0.078125
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)
accuracy13.890257317930619
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
Samples
25.0ms130×0invalid
12.0ms59×0valid
12.0ms30×2valid
11.0ms18×3valid
6.0ms19×1valid
Compiler

Compiled 189 to 26 computations (86.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 42.0ms
ival-mult: 13.0ms (30.8% of total)
ival-div: 9.0ms (21.3% of total)
ival-hypot: 8.0ms (18.9% of total)
ival-sqrt: 6.0ms (14.2% of total)
adjust: 2.0ms (4.7% of total)
ival-sub: 2.0ms (4.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series30.0ms (0.4%)

Memory
14.0MiB live, 52.3MiB allocated
Counts
18 → 384
Calls
Call 1
Inputs
#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())
#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())
#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())
#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())
#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())
#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())
#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())
#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())
#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())
Outputs
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (patch (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 re)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 re)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 re)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 re)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 re)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 re)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 re)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 re)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2)) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2)) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2)) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2)) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) (patch (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (patch (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) (patch (*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) (patch (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) (patch #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (/.f64 (*.f64 im im) re) (patch (/.f64 (*.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re))) (taylor -inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re))) (taylor -inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re))) (taylor -inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re))) (taylor -inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor -inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor -inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor -inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor -inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf re) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor inf im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* im (sqrt (/ 1 re)))) (taylor -inf im) (#s(alt (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) (patch (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) (patch #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (*.f64 im im) (patch (*.f64 im im) #<representation binary64>) () ())) ())
Calls

96 calls:

TimeVariablePointExpression
6.0ms
re
@-inf
(* (* (sqrt (/ 1 re)) im) 1/2)
1.0ms
re
@-inf
(/ 1/2 (sqrt re))
0.0ms
re
@-inf
(/ (sqrt re) im)
0.0ms
re
@0
(/ (sqrt re) im)
0.0ms
im
@inf
(/ (* im im) re)

simplify355.0ms (4.4%)

Memory
10.3MiB live, 481.8MiB allocated
Algorithm
egg-herbie
Rules
11 872×lower-fma.f64
11 872×lower-fma.f32
7 702×lower-*.f64
7 702×lower-*.f32
3 622×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04337435
113926885
252146834
083036609
Stop Event
iter limit
node limit
Counts
384 → 384
Calls
Call 1
Inputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/32 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 1/64 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)) (/.f64 (fma.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 im im) (*.f64 im im))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) #s(literal 1/16 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 im (neg.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) #s(literal -3/16 binary64)) (*.f64 im (*.f64 im im)))))))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) im))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) im))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) im))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/32 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 1/64 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)) (/.f64 (fma.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 im im) (*.f64 im im))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) #s(literal 1/16 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 im (neg.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) #s(literal -3/16 binary64)) (*.f64 im (*.f64 im im)))))))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/32 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 1/64 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)) (/.f64 (fma.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 im im) (*.f64 im im))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) #s(literal 1/16 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 im (neg.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) #s(literal -3/16 binary64)) (*.f64 im (*.f64 im im)))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 1/32 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (/.f64 (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/256 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -2 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (*.f64 re (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 #s(literal -1/16 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)))) (*.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(*.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (fma.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal -1/16 binary64) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 im (*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/2 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/4 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal -1/2 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (neg.f64 (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) #s(literal -3/8 binary64)) (*.f64 im (*.f64 im im))))) (neg.f64 im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im)) #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (fma.f64 im im (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (+.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal -5/64 binary64)) (pow.f64 re #s(literal 6 binary64))))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(neg.f64 (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))) (neg.f64 re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(neg.f64 (*.f64 re (+.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 im im) (*.f64 re re)))))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 im (*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(*.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -5/64 binary64) (*.f64 im (/.f64 im (pow.f64 re #s(literal 7 binary64)))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (fma.f64 re (/.f64 re (*.f64 im im)) (fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (*.f64 im im)))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(neg.f64 (*.f64 im (fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(neg.f64 (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(*.f64 im (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 im im)) (*.f64 re re)) im)) im))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/32 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 1/64 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)) (/.f64 (fma.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 im im) (*.f64 im im))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) #s(literal 1/16 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 im (neg.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) #s(literal -3/16 binary64)) (*.f64 im (*.f64 im im)))))))
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(/.f64 (sqrt.f64 re) im)
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(/.f64 (sqrt.f64 re) im)
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(/.f64 (sqrt.f64 re) im)
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/32 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 1/64 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)) (/.f64 (fma.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 im im) (*.f64 im im))))) (neg.f64 (*.f64 re (*.f64 re re))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) im) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(*.f64 im (fma.f64 (*.f64 im im) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 re re)) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) #s(literal 1/16 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 im (neg.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) #s(literal -3/16 binary64)) (*.f64 im (*.f64 im im)))))))
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)

rewrite348.0ms (4.3%)

Memory
4.7MiB live, 316.0MiB allocated
Rules
4 302×lower-fma.f64
4 302×lower-fma.f32
4 022×lower-*.f32
4 012×lower-*.f64
2 880×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
033206
048214
1147195
2742195
36556195
08478160
Stop Event
iter limit
node limit
iter limit
Counts
18 → 549
Calls
Call 1
Inputs
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
(sqrt.f64 re)
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))
(/.f64 (*.f64 im im) re)
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
(/.f64 (sqrt.f64 re) im)
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
(*.f64 im im)
Outputs
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) im)) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(neg.f64 (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(neg.f64 (*.f64 im (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re))))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sqrt.f64 re) im) #s(literal -2 binary64)))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im)))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 re) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (neg.f64 im) (*.f64 (sqrt.f64 re) #s(literal -2 binary64)))
(/.f64 (neg.f64 im) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(/.f64 (neg.f64 im) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) #s(literal -1 binary64)))
(/.f64 (neg.f64 im) (*.f64 (*.f64 (sqrt.f64 re) #s(literal -2 binary64)) #s(literal 1 binary64)))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(/.f64 (/.f64 im (sqrt.f64 re)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (neg.f64 (sqrt.f64 re)) #s(literal -1 binary64)))
(/.f64 (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))) #s(literal -1 binary64))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (neg.f64 im) #s(literal -1/2 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 im (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re))) #s(literal -1 binary64))
(/.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))) (pow.f64 im #s(literal -1/2 binary64)))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) im)) (sqrt.f64 (neg.f64 re)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))) (neg.f64 (sqrt.f64 re)))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1 binary64) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 im #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(*.f64 (neg.f64 im) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (neg.f64 im))
(*.f64 #s(literal -1/2 binary64) (/.f64 (neg.f64 im) (sqrt.f64 re)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)) #s(literal -1/2 binary64))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (*.f64 im #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (/.f64 (neg.f64 im) #s(literal 2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)) (*.f64 im #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 im (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 re) im)) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (log.f64 re))) (*.f64 #s(literal -1 binary64) (log.f64 im))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 re))) (/.f64 (neg.f64 im) (sqrt.f64 re)))
(neg.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)))
(/.f64 im (sqrt.f64 re))
(/.f64 im (*.f64 (neg.f64 (sqrt.f64 re)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(/.f64 (neg.f64 im) (neg.f64 (sqrt.f64 re)))
(/.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) im) (sqrt.f64 (neg.f64 re))))
(/.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)) #s(literal -1 binary64))
(/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) im) (sqrt.f64 (neg.f64 re))))
(/.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal -1 binary64) im) (sqrt.f64 (neg.f64 re))))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (neg.f64 re)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)) (*.f64 (sqrt.f64 (neg.f64 re)) (/.f64 #s(literal -1 binary64) im)))
(/.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 re))))
(/.f64 (*.f64 (neg.f64 im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (neg.f64 re))))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (*.f64 (sqrt.f64 (neg.f64 re)) #s(literal 1 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (neg.f64 im)) (*.f64 (sqrt.f64 (neg.f64 re)) #s(literal -1 binary64)))
(/.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(/.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))) (pow.f64 im #s(literal -1/2 binary64)))
(/.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) im))
(/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) im))
(pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1 binary64))
(pow.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1 binary64))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 #s(literal 1 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 im) (sqrt.f64 re)))
(*.f64 (neg.f64 im) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (neg.f64 im))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (/.f64 (pow.f64 re #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) im)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) im))
(*.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 im (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 (neg.f64 im) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 re #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) im)))
(*.f64 (/.f64 (pow.f64 re #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) im)) (/.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 re #s(literal -1/4 binary64)) (/.f64 #s(literal -1 binary64) im)))
(*.f64 (/.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)) (neg.f64 im))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1/2 binary64)))
(*.f64 (*.f64 im (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)) (neg.f64 im))
(*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal -1 binary64)) im)
(exp.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (log.f64 re))))
(exp.f64 (*.f64 (log.f64 re) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 re)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 re)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 re))))
(fabs.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 re))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 re))))
(/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (neg.f64 re)))
(/.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (neg.f64 re))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(pow.f64 re #s(literal -1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 re) #s(literal -1 binary64))
(pow.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal 1 binary64) re)) #s(literal 1/4 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 re))))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (/.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(*.f64 (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) im)) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(neg.f64 (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(neg.f64 (*.f64 im (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re))))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sqrt.f64 re) im) #s(literal -2 binary64)))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im)))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 re) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (neg.f64 im) (*.f64 (sqrt.f64 re) #s(literal -2 binary64)))
(/.f64 (neg.f64 im) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(/.f64 (neg.f64 im) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) #s(literal -1 binary64)))
(/.f64 (neg.f64 im) (*.f64 (*.f64 (sqrt.f64 re) #s(literal -2 binary64)) #s(literal 1 binary64)))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(/.f64 (/.f64 im (sqrt.f64 re)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (neg.f64 (sqrt.f64 re)) #s(literal -1 binary64)))
(/.f64 (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))) #s(literal -1 binary64))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (neg.f64 im) #s(literal -1/2 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 im (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re))) #s(literal -1 binary64))
(/.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))) (pow.f64 im #s(literal -1/2 binary64)))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) im)) (sqrt.f64 (neg.f64 re)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))) (neg.f64 (sqrt.f64 re)))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1 binary64) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 im #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(*.f64 (neg.f64 im) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (neg.f64 im))
(*.f64 #s(literal -1/2 binary64) (/.f64 (neg.f64 im) (sqrt.f64 re)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)) #s(literal -1/2 binary64))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (*.f64 im #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (/.f64 (neg.f64 im) #s(literal 2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)) (*.f64 im #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 im (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 re)))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 2 binary64))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 re) #s(literal -2 binary64)))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) #s(literal -1 binary64))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (sqrt.f64 re)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 re)))
(pow.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) #s(literal -1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) #s(literal -1/2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 re)))
(-.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 re)))
(sqrt.f64 re)
(neg.f64 (neg.f64 (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(/.f64 (sqrt.f64 re) #s(literal 1 binary64))
(/.f64 (neg.f64 (sqrt.f64 re)) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (neg.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(*.f64 (sqrt.f64 re) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (/.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64))) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))
(exp.f64 (*.f64 (log.f64 (/.f64 re (*.f64 im im))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (/.f64 (*.f64 im im) re)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im (neg.f64 im)) re))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 re)) (/.f64 (*.f64 im (neg.f64 im)) re))
(neg.f64 (/.f64 (*.f64 im (neg.f64 im)) re))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (neg.f64 im)) re)))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))))
(/.f64 im (/.f64 re im))
(/.f64 im (*.f64 (/.f64 #s(literal 1 binary64) im) re))
(/.f64 im (*.f64 #s(literal 1 binary64) (/.f64 re im)))
(/.f64 im (*.f64 (/.f64 #s(literal -1 binary64) im) (neg.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 im im)))
(/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(/.f64 (*.f64 im im) re)
(/.f64 (/.f64 (*.f64 im im) re) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im (neg.f64 im))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 re im)))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 re im) (/.f64 #s(literal -1 binary64) im)))
(/.f64 (neg.f64 im) (*.f64 re (/.f64 #s(literal -1 binary64) im)))
(/.f64 (neg.f64 im) (*.f64 (neg.f64 re) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (neg.f64 im) (*.f64 (/.f64 #s(literal 1 binary64) im) (neg.f64 re)))
(/.f64 (neg.f64 im) (*.f64 (/.f64 #s(literal -1 binary64) im) re))
(/.f64 (neg.f64 im) (*.f64 #s(literal -1 binary64) (/.f64 re im)))
(/.f64 (neg.f64 im) (*.f64 (/.f64 re im) #s(literal -1 binary64)))
(/.f64 (*.f64 im (neg.f64 im)) (neg.f64 re))
(/.f64 (*.f64 im (neg.f64 im)) (*.f64 #s(literal 1 binary64) (neg.f64 re)))
(/.f64 (/.f64 im re) (/.f64 #s(literal 1 binary64) im))
(/.f64 (/.f64 (*.f64 im (neg.f64 im)) re) #s(literal -1 binary64))
(/.f64 (*.f64 (/.f64 im re) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) im))
(/.f64 (*.f64 #s(literal -1 binary64) (/.f64 im re)) (/.f64 #s(literal -1 binary64) im))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1 binary64))
(*.f64 im (/.f64 im re))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) re))
(*.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im im))
(*.f64 (/.f64 #s(literal 1 binary64) re) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im im)))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re))
(*.f64 (/.f64 (*.f64 im im) re) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im (neg.f64 im)) re))
(*.f64 (neg.f64 im) (/.f64 im (neg.f64 re)))
(*.f64 (neg.f64 im) (/.f64 (neg.f64 im) re))
(*.f64 (neg.f64 im) (*.f64 im (/.f64 #s(literal -1 binary64) re)))
(*.f64 (*.f64 im (neg.f64 im)) (/.f64 #s(literal -1 binary64) re))
(*.f64 (/.f64 im (sqrt.f64 re)) (/.f64 im (sqrt.f64 re)))
(*.f64 (/.f64 im re) im)
(*.f64 (/.f64 #s(literal -1 binary64) re) (*.f64 im (neg.f64 im)))
(*.f64 (/.f64 (*.f64 im (neg.f64 im)) re) #s(literal -1 binary64))
(*.f64 (pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (*.f64 (/.f64 im re) #s(literal -1 binary64)) (neg.f64 im))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) im)) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(neg.f64 (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(neg.f64 (*.f64 im (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re))))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sqrt.f64 re) im) #s(literal -2 binary64)))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im)))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 re) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (neg.f64 im) (*.f64 (sqrt.f64 re) #s(literal -2 binary64)))
(/.f64 (neg.f64 im) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(/.f64 (neg.f64 im) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) #s(literal -1 binary64)))
(/.f64 (neg.f64 im) (*.f64 (*.f64 (sqrt.f64 re) #s(literal -2 binary64)) #s(literal 1 binary64)))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(/.f64 (/.f64 im (sqrt.f64 re)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (neg.f64 (sqrt.f64 re)) #s(literal -1 binary64)))
(/.f64 (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))) #s(literal -1 binary64))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (neg.f64 im) #s(literal -1/2 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 im (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re))) #s(literal -1 binary64))
(/.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))) (pow.f64 im #s(literal -1/2 binary64)))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) im)) (sqrt.f64 (neg.f64 re)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))) (neg.f64 (sqrt.f64 re)))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1 binary64) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 im #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(*.f64 (neg.f64 im) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (neg.f64 im))
(*.f64 #s(literal -1/2 binary64) (/.f64 (neg.f64 im) (sqrt.f64 re)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)) #s(literal -1/2 binary64))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (*.f64 im #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (/.f64 (neg.f64 im) #s(literal 2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)) (*.f64 im #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 im (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))))
(exp.f64 (*.f64 (log.f64 (/.f64 im (sqrt.f64 re))) #s(literal -1 binary64)))
(exp.f64 (fma.f64 #s(literal 1/2 binary64) (log.f64 re) (*.f64 #s(literal -1 binary64) (log.f64 im))))
(exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 im) (*.f64 #s(literal 1/2 binary64) (log.f64 re))))
(exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 im)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (log.f64 re)))))
(-.f64 #s(literal 0 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(neg.f64 (neg.f64 (/.f64 (sqrt.f64 re) im)))
(/.f64 #s(literal 1 binary64) (/.f64 im (sqrt.f64 re)))
(/.f64 (sqrt.f64 re) im)
(/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 im) (sqrt.f64 re)))
(/.f64 (neg.f64 (sqrt.f64 re)) (neg.f64 im))
(/.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 re) im)) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 re)) #s(literal -1 binary64)) im)
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 re))) (neg.f64 im))
(/.f64 (/.f64 (sqrt.f64 re) #s(literal -1 binary64)) (neg.f64 im))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1 binary64))
(pow.f64 (/.f64 im (sqrt.f64 re)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))
(*.f64 (sqrt.f64 re) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) im) (sqrt.f64 re))
(*.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(*.f64 (neg.f64 (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im))
(*.f64 (/.f64 #s(literal -1 binary64) im) (neg.f64 (sqrt.f64 re)))
(*.f64 (neg.f64 (/.f64 (sqrt.f64 re) im)) #s(literal -1 binary64))
(*.f64 (pow.f64 im #s(literal -1/2 binary64)) (/.f64 (pow.f64 im #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(*.f64 (pow.f64 im #s(literal -1/2 binary64)) (*.f64 (pow.f64 im #s(literal -1/2 binary64)) (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (/.f64 (pow.f64 re #s(literal 1/4 binary64)) im))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) im)))
(*.f64 (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) im))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 re)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 (pow.f64 re #s(literal 1/4 binary64)) im) (/.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 (pow.f64 im #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 im #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(*.f64 (/.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 re #s(literal 1/4 binary64)) im))
(*.f64 (/.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 re #s(literal 1/4 binary64)) (neg.f64 im)))
(*.f64 (/.f64 (sqrt.f64 re) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) im))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 re #s(literal -1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (pow.f64 re #s(literal -1/4 binary64))) (/.f64 (/.f64 #s(literal -1 binary64) im) (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 (/.f64 (pow.f64 im #s(literal -1/2 binary64)) (pow.f64 re #s(literal -1/4 binary64))) (/.f64 (pow.f64 im #s(literal -1/2 binary64)) (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 (pow.f64 (/.f64 im (sqrt.f64 re)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 im (sqrt.f64 re)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 im #s(literal -1/2 binary64))) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (*.f64 (pow.f64 im #s(literal -1/2 binary64)) (pow.f64 re #s(literal 1/4 binary64))) (*.f64 (pow.f64 im #s(literal -1/2 binary64)) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (*.f64 (sqrt.f64 re) (pow.f64 im #s(literal -1/2 binary64))) (pow.f64 im #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 re)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (neg.f64 re)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) im)) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(neg.f64 (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(neg.f64 (*.f64 im (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re))))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im))
(/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sqrt.f64 re) im) #s(literal -2 binary64)))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im)))
(/.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sqrt.f64 re) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (neg.f64 im) (*.f64 (sqrt.f64 re) #s(literal -2 binary64)))
(/.f64 (neg.f64 im) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(/.f64 (neg.f64 im) (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) #s(literal -1 binary64)))
(/.f64 (neg.f64 im) (*.f64 (*.f64 (sqrt.f64 re) #s(literal -2 binary64)) #s(literal 1 binary64)))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(/.f64 (/.f64 im (sqrt.f64 re)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (neg.f64 (sqrt.f64 re)) #s(literal -1 binary64)))
(/.f64 (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))) #s(literal -1 binary64))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (neg.f64 im) #s(literal -1/2 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 im (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re))) #s(literal -1 binary64))
(/.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))) (pow.f64 im #s(literal -1/2 binary64)))
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 re)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (neg.f64 re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) im)) (sqrt.f64 (neg.f64 re)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))) (neg.f64 (sqrt.f64 re)))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1 binary64) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 im #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 im (*.f64 (sqrt.f64 re) #s(literal -2 binary64))))
(*.f64 (neg.f64 im) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (neg.f64 im))
(*.f64 #s(literal -1/2 binary64) (/.f64 (neg.f64 im) (sqrt.f64 re)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (neg.f64 im) (sqrt.f64 re)) #s(literal -1/2 binary64))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (*.f64 im #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (/.f64 (neg.f64 im) #s(literal 2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64)) (*.f64 im #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) (pow.f64 im #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 im (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) im) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 re))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)))
(-.f64 #s(literal 0 binary64) (*.f64 im (neg.f64 im)))
(neg.f64 (*.f64 im (neg.f64 im)))
(/.f64 im (/.f64 #s(literal 1 binary64) im))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 #s(literal -1 binary64) im)))
(/.f64 (*.f64 im im) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 binary64) im)))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (neg.f64 im) (/.f64 #s(literal -1 binary64) im))
(/.f64 (*.f64 im (neg.f64 im)) #s(literal -1 binary64))
(pow.f64 im #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im)) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(*.f64 im im)
(*.f64 #s(literal 1 binary64) (*.f64 im im))
(*.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 im) #s(literal 2 binary64)))
(*.f64 (*.f64 im im) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 im (neg.f64 im)))
(*.f64 (neg.f64 im) (neg.f64 im))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))

eval119.0ms (1.5%)

Memory
8.1MiB live, 161.8MiB allocated
Compiler

Compiled 15 105 to 1 473 computations (90.2% saved)

prune157.0ms (1.9%)

Memory
-5.1MiB live, 165.5MiB allocated
Pruning

16 alts after pruning (3 fresh and 13 done)

PrunedKeptTotal
New1 03311 034
Fresh022
Picked145
Done099
Total1 034161 050
Accuracy
100.0%
Counts
1 050 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
52.9%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
43.7%
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
19.0%
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #s(literal 1/2 binary64))
80.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
24.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64)))))) re))))
53.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
50.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
27.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
50.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
27.3%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
27.3%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im))))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
27.4%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
27.3%
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
Compiler

Compiled 449 to 235 computations (47.7% saved)

regimes70.0ms (0.9%)

Memory
0.9MiB live, 80.8MiB allocated
Counts
23 → 2
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64)))))) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im))))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
Calls

7 calls:

19.0ms
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
16.0ms
im
7.0ms
re
7.0ms
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
7.0ms
(*.f64 im im)
Results
AccuracySegmentsBranch
93.0%2re
80.5%1im
90.4%2(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
90.4%2(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
90.4%2(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
90.4%2(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
80.5%1(*.f64 im im)
Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes34.0ms (0.4%)

Memory
-18.1MiB live, 60.3MiB allocated
Counts
21 → 4
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 re (*.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64)))))) re))))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
Calls

5 calls:

7.0ms
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
7.0ms
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
6.0ms
re
6.0ms
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
6.0ms
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
Results
AccuracySegmentsBranch
75.4%4(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
75.4%4(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
75.5%4(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
75.5%4(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
85.6%4re
Compiler

Compiled 61 to 40 computations (34.4% saved)

regimes14.0ms (0.2%)

Memory
20.4MiB live, 20.4MiB allocated
Counts
13 → 3
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))
Calls

3 calls:

4.0ms
im
4.0ms
re
4.0ms
(*.f64 im im)
Results
AccuracySegmentsBranch
63.4%2im
62.8%2(*.f64 im im)
83.2%3re
Compiler

Compiled 11 to 7 computations (36.4% saved)

regimes3.0ms (0%)

Memory
4.6MiB live, 4.6MiB allocated
Counts
5 → 3
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))
Calls

1 calls:

3.0ms
re
Results
AccuracySegmentsBranch
83.1%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes2.0ms (0%)

Memory
4.1MiB live, 4.1MiB allocated
Counts
4 → 3
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
Calls

1 calls:

2.0ms
re
Results
AccuracySegmentsBranch
83.1%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes12.0ms (0.2%)

Memory
-23.1MiB live, 16.6MiB allocated
Counts
3 → 2
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
Calls

5 calls:

5.0ms
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
2.0ms
re
2.0ms
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
2.0ms
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
2.0ms
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
Results
AccuracySegmentsBranch
55.1%2(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
55.1%2(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
53.3%1(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
53.3%1(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
64.2%2re
Compiler

Compiled 61 to 40 computations (34.4% saved)

regimes9.0ms (0.1%)

Memory
17.4MiB live, 17.4MiB allocated
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
Calls

7 calls:

1.0ms
re
1.0ms
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
1.0ms
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
1.0ms
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
1.0ms
im
Results
AccuracySegmentsBranch
50.9%1(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
50.9%1(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
50.9%1(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
50.9%1(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
50.9%1(*.f64 im im)
50.9%1im
50.9%1re
Compiler

Compiled 69 to 45 computations (34.8% saved)

bsearch15.0ms (0.2%)

Memory
-22.0MiB live, 15.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
14.0ms
3.196078506197095e-70
1.0866904235869399e-69
Samples
6.0ms52×0valid
4.0ms20×2valid
1.0ms1valid
Compiler

Compiled 145 to 109 computations (24.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 6.0ms
ival-hypot: 2.0ms (34.5% of total)
ival-mult: 1.0ms (17.2% of total)
ival-sub: 1.0ms (17.2% of total)
ival-sqrt: 1.0ms (17.2% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch21.0ms (0.3%)

Memory
27.9MiB live, 28.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.196078506197095e-70
1.0866904235869399e-69
8.0ms
-6.963318463497006e-151
-2.6476410797083367e-151
10.0ms
-5.398510374077686e+145
-5.750744823185477e+144
Samples
11.0ms176×0valid
Compiler

Compiled 447 to 329 computations (26.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 7.0ms
ival-hypot: 3.0ms (40.2% of total)
ival-mult: 2.0ms (26.8% of total)
ival-sub: 1.0ms (13.4% of total)
ival-sqrt: 1.0ms (13.4% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch64.0ms (0.8%)

Memory
-14.2MiB live, 21.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.196078506197095e-70
1.0866904235869399e-69
62.0ms
-1.3665956551680419e+47
-8.633150980685437e+39
Samples
9.0ms144×0valid
Compiler

Compiled 338 to 257 computations (24% saved)

Precisions
Click to see histograms. Total time spent on operations: 6.0ms
ival-hypot: 3.0ms (49.8% of total)
ival-mult: 2.0ms (33.2% of total)
ival-sub: 1.0ms (16.6% of total)
ival-sqrt: 1.0ms (16.6% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.196078506197095e-70
1.0866904235869399e-69
1.0ms
-1.3665956551680419e+47
-8.633150980685437e+39
Compiler

Compiled 328 to 247 computations (24.7% saved)

bsearch2.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.196078506197095e-70
1.0866904235869399e-69
1.0ms
-1.3665956551680419e+47
-8.633150980685437e+39
Compiler

Compiled 328 to 247 computations (24.7% saved)

bsearch1.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
-1.3665956551680419e+47
-8.633150980685437e+39
Compiler

Compiled 200 to 158 computations (21% saved)

simplify10.0ms (0.1%)

Memory
13.5MiB live, 13.5MiB allocated
Algorithm
egg-herbie
Rules
30×*-commutative_binary64
+-commutative_binary64
sub-neg_binary64
1-exp_binary64
neg-sub0_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
069393
190393
296393
398393
499393
Stop Event
saturated
Calls
Call 1
Inputs
(if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))))
(if (<=.f64 re #s(literal -27000000000000002200753376626538203162891742631859002244779409592993234131029319555065281602498661901477944600192195813828978321376541356280774656 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal -138206631768367/460688772561223309599799143187044542348256984914116263229517370635452168260760357920669766257038423772151901248872539660616526444082616288154471954520592778765795328 binary64)) (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
Outputs
(if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))))
(if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(if (<=.f64 re #s(literal -27000000000000002200753376626538203162891742631859002244779409592993234131029319555065281602498661901477944600192195813828978321376541356280774656 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal -138206631768367/460688772561223309599799143187044542348256984914116263229517370635452168260760357920669766257038423772151901248872539660616526444082616288154471954520592778765795328 binary64)) (*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64)) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64))))))
(if (<=.f64 re #s(literal -27000000000000002200753376626538203162891742631859002244779409592993234131029319555065281602498661901477944600192195813828978321376541356280774656 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal -138206631768367/460688772561223309599799143187044542348256984914116263229517370635452168260760357920669766257038423772151901248872539660616526444082616288154471954520592778765795328 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) #s(literal 1/2 binary64)))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64)))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 8858570148549325/15541351137805832567355695254588151253139254712417116170014499277911234281641667985408 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))))
(if (<=.f64 re #s(literal -550000000000000032424267218475380950171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im))))

soundness829.0ms (10.2%)

Memory
-15.0MiB live, 548.4MiB allocated
Rules
11 848×lower-fma.f64
11 848×lower-fma.f32
10 008×lower-fma.f32
10 006×lower-fma.f64
8 470×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01265
02065
15665
237465
3419265
0839138
05513257
118143103
263803088
081972913
040249
065249
1146248
2694246
36307246
08591190
043245
070241
1193230
21121218
08566218
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
Compiler

Compiled 557 to 320 computations (42.5% saved)

preprocess50.0ms (0.6%)

Memory
-11.7MiB live, 102.3MiB allocated
Remove

(abs im)

Compiler

Compiled 526 to 202 computations (61.6% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...